Thema Datum  Von Nutzer Rating
Antwort
09.10.2020 15:59:55 Trannel
NotSolved
09.10.2020 16:13:51 Mase
NotSolved
09.10.2020 16:19:15 Trannel
NotSolved
Blau Verknüpfung zwischen Word-Userform(Basis) und Excel-Tabelle("Datenbank")
09.10.2020 16:36:03 Mase
NotSolved
09.10.2020 16:43:16 Trannel
NotSolved

Ansicht des Beitrags:
Von:
Mase
Datum:
09.10.2020 16:36:03
Views:
659
Rating: Antwort:
  Ja
Thema:
Verknüpfung zwischen Word-Userform(Basis) und Excel-Tabelle("Datenbank")

Gut. Dann arbeite besser noch mit der Excel-Intellisense. Hierzu den Verweis auf die Objektbibliothek setzen:

 

 

Grundsätzlich referenzierst Du so:

Option Explicit

Sub Word2Excel()
    '*** Deklarationsteil
    Dim xlApp As Excel.Application
    Dim wkb As Excel.Workbook
    Dim wks As Excel.Worksheet
    Dim rng As Excel.Range
    '*** Definitionsteil
    On Error GoTo FinishErr
    '*** Falls Excel offen; Instanz referenzieren; ansonsten geh in Fehlerbehandlung und erzeuge einen neue Instanz
    Set xlApp = GetObject(class:="Excel.Application")
    '*** Hier Referenz der Mappe
    Set wkb = xlApp.Workbooks.Open("Pfad_zur_Datei")
    '*** Hier Referenz auf Arbeitsblatt der Mappe
    Set wks = wkb.Worksheets("Tabelle1")
    '*** Hier Referenz einer Zelle/Bereich...
    Set rng = wks.Range("A1")
    
   
   
FinishErr:
Select Case Err.Number
    Case 429:
    Set xlApp = CreateObject(class:="Excel.application")
    Resume Next

    Case Else
    Debug.Print Err.Number & vbNewLine & Err.Description
End Select
    
Set rng = Nothing: Set wks = Nothing: Set wkb = Nothing: Set xlApp = Nothing
End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
09.10.2020 15:59:55 Trannel
NotSolved
09.10.2020 16:13:51 Mase
NotSolved
09.10.2020 16:19:15 Trannel
NotSolved
Blau Verknüpfung zwischen Word-Userform(Basis) und Excel-Tabelle("Datenbank")
09.10.2020 16:36:03 Mase
NotSolved
09.10.2020 16:43:16 Trannel
NotSolved