Windows(--Variable--).Activate Wie?
07.03.2005 14:02:03
Alex
Wie bekomme ich in Diesen Befehl: Windows(--Variable--).Activate eine Variable, dort wo Variable steht. Habe folgendes vor:
Einlesen der Ladeliste
Sheets("Eingang").Select
Range("A1").Select
Dim textdatei As Variant
textdatei = Application.GetOpenFilename("Text Files (*.txt), *.txt")
Workbooks.OpenText Filename:="" & textdatei, Origin _
:=xlWindows, StartRow:=1, DataType:=xlFixedWidth, FieldInfo:=Array(Array _
(0, 1), Array(5, 2), Array(8, 1), Array(14, 2), Array(24, 1), Array(104, 1), Array(132, 1), _
Array(137, 1)), TrailingMinusNumbers:=True
Range("B:B,D:D").Select
Selection.Copy
Windows("Mappe2.xls").Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Windows(" " & textdatei).Activate
ActiveWorkbook.Close
Range("A1").Select