Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

viele Dateien an gleicher Stellen den selben Text

Forumthread: viele Dateien an gleicher Stellen den selben Text

viele Dateien an gleicher Stellen den selben Text
08.11.2004 13:09:37
Gabriele
Hallo,
ich habe mehrere Dateien / Exel-Tabellen geöffnet und brauche in jeder Datei in der gleichen Zelle den selben Text. Kopieren über die Zwischenablage ist sehr aufwendig bei der Vielzahl der Dateien - gibt es eine einfache Lösung?
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: viele Dateien an gleicher Stellen den selben Text
08.11.2004 13:30:13
Rolf
Hallo Gabriele,
den folgenden Code müsstet du
lediglich hinsichtlich Sheetindex (1 ersetzen)
und Range-Adresse (A1 ersetzen) anpassen
fG
Rolf

Sub gleicherText()
Dim wbs As Workbook
Dim txt As String
txt = InputBox("Bitte den Text eingeben")
For Each wbs In Workbooks
wbs.Sheets(1).Range("A1") = txt
Next
End Sub

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige