Opened by NixIsFix at 2009-05-06 16:53
ok - habe mal ein wenig rumprobiert mit Win32::OLE & Excel
derzeit kann ich:
eine Datei erstellen
eine Datei öffnen
ein sheet erstellen und benamen
ein vorhandenes sheet umbennen
und mir den namen eines sheets ausgeben lassen.
was mir fehle bzw wobei ich probleme habe :
a. alle sheets durchlaufen
b. den kopierbefehl zu "übersetzen"
zu a:
habe schon diverses probiert jedoch bisher ohne erfolg.
habe versucht die sheets per whileschleife zu durchlaufen - klappt nicht bzw klappt teilweise.
perl code:
Ausgabe/fehlermeldung:
zu B:
von dem Makrorecorder habe ich folgende Code erhalten, jedoch tue ich mir schwer ihn anzuwenden bzw zu übersetzen.
kannst du mir wieder einen kleinen tipp geben?
mfg
derzeit kann ich:
eine Datei erstellen
eine Datei öffnen
ein sheet erstellen und benamen
ein vorhandenes sheet umbennen
und mir den namen eines sheets ausgeben lassen.
was mir fehle bzw wobei ich probleme habe :
a. alle sheets durchlaufen
b. den kopierbefehl zu "übersetzen"
zu a:
habe schon diverses probiert jedoch bisher ohne erfolg.
habe versucht die sheets per whileschleife zu durchlaufen - klappt nicht bzw klappt teilweise.
perl code:
Code (perl): (dl
)
1 2 3 4 5
my $n = 1; while ($Book->Worksheets($n)){ print STDERR "Durchlauf : $n\n"; $n += 1; }
Ausgabe/fehlermeldung:
Code: (dl
)
1
2
3
4
5
6
Durchlauf : 1
Durchlauf : 2
Durchlauf : 3
Durchlauf : 4
Win32::OLE(0.1709) error 0x8002000b: "Ung³ltiger Index"
in METHOD/PROPERTYGET "Worksheets" at D:\Tools\ExcelTests.pl line 35
zu B:
von dem Makrorecorder habe ich folgende Code erhalten, jedoch tue ich mir schwer ihn anzuwenden bzw zu übersetzen.
Code: (dl
)
Sheets("DauTest").Move Before:=Workbooks("B.xls").Sheets(1)kannst du mir wieder einen kleinen tipp geben?
mfg