Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA; Seriendruck Word/Excel

Forumthread: VBA; Seriendruck Word/Excel

VBA; Seriendruck Word/Excel
11.01.2003 01:16:07
Dieter
Ich möchte über Seriendruck aus Word eine bestimmte Zeile aus Excel importieren (Zeile ist eindeutig).
Über einen Makro habe folgende Zeile generiert:
ActiveDocument.MaiMerge.DataSource.QueryString = SELECT * FROM
(Verzeichnispfad,Dateiname.xls) WHERE ((Var = 100)).
Anstelle des Wertes "100" soll aber eine Variable, die mittels einer InputBox-Variablen ermittelt wird, selektiert werden.
Kann mir jemand sagen, wie die Syntax aussieht. (Die Variable habe ich als Integer definiert)
Schon mal vielen Dank für die Unterstützung





Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: VBA; Seriendruck Word/Excel
11.01.2003 15:43:46
Steffan
Hallo,

veruch es mal so:


Dim zeile As Integer
On Error GoTo Fehler
zeile = CInt(InputBox("Deine Abfrage", "Dein Titel", "Deine Vorgabe"))
ActiveDocument.MaiMerge.DataSource.QueryString = SELECT * FROM
(Verzeichnispfad,Dateiname.xls) WHERE ((Var = zeile))
'...
'evtl. sonstiger Code
'...
Exit Sub
Fehler:
If Err.Number = 13 Then MsgBox "Zahleneingabe erforderlich!", vbCritical, "Dein Titel"
Resume
End Sub


Steffan.

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige