|
Excel : Catscript Excel Tabelle kopieren und einfüge
BLD1983 am 16.09.2020 um 15:26 Uhr (1)
Hallo.Bin mir da garnicht sicher was Catia akzeptiert oder nicht.Mal so mal so.Wie würdest du es in VBA lösen?Mit freundlichen GrüßenBld1983------------------Ich will es gar nicht wissen, aber ich muss.....Das Leben verlangt es.
|
| In das Form Excel wechseln |
|
Excel : Catscript Excel Tabelle kopieren und einfüge
BLD1983 am 22.09.2020 um 09:21 Uhr (1)
Hallo Klaus.Erstmals danke.Habe deinen Code in Excel ausprobiert und da gehenSet objXL1 = Workbooks.Open("Z:.....Schein.xlsx")Set objXL2 = Workbooks.Open("Z:.....LISTE1.xlsx")Set objXL3 = Workbooks.Open("z:..Material.xlsm") automatisch auf und mit objXL1.Worksheets(2).Activate aktiviert sich das eingefügte Blatt.In Catia geht ohne Dim objXL01 As Excel.Application und Set objXL01 = CreateObject("Excel.Application") natürlich garnichts,und wird nur mit objXL01.Visible = True angezeigt.Vielleicht denke ich zu ...
|
| In das Form Excel wechseln |
|
Excel : Catscript Excel Tabelle kopieren und einfüge
BLD1983 am 23.09.2020 um 13:39 Uhr (1)
Nein Halt STOP, da war ich zu voreiligIn VBA funktioniert es...In CatScript funktioniert zwar das Ausblenden der xls-Datein jedoch fügt er nichts in "Schein.xlsx" ein....objXL3.Sheets("Material").Copy Before:=objXL1.Sheets(2)....Ich muss mal Tippfehler suchen ------------------Ich will es gar nicht wissen, aber ich muss.....Das Leben verlangt es.
|
| In das Form Excel wechseln |
|
Excel : Catscript Excel Tabelle kopieren und einfüge
BLD1983 am 17.09.2020 um 11:03 Uhr (1)
Hallo Henry.Habe ich auch aber dann werden mit objXL01.Visible = True alle 3 Datein sichbar.und mit objXL1.Visible = True kommt eine Fehlermeldung.dein code mit: objXL03.Sheets("Material").Copy Before:=objXL01.Sheets(Worksheets(2)) kann auch nicht funktionieren da nicht definiertund bei: objXL3.Sheets("Material").Copy Before:=objXL1.Sheets(Worksheets(2)) kommt fehelrmeldung Type mismatch------------------Ich will es gar nicht wissen, aber ich muss.....Das Leben verlangt es.
|
| In das Form Excel wechseln |
|
Excel : Catscript Excel Tabelle kopieren und einfüge
BLD1983 am 17.09.2020 um 13:40 Uhr (1)
Hall Bernd.Danke Bernd Before:=objXL1.Sheets(2) funktioniert.......Before:=objXL1.Sheets(2) hatte ich ausprobiert, jedoch hatte ich vorher 3 Applicationen und da funktioniert es nicht.So aber wie mache ich jetzt nur objXL1. sichtbar.objXL01.Visible = True macht jetzt alle 3 Dateien auf.objXL1.Visible = Fehlermeldung------------------Ich will es gar nicht wissen, aber ich muss.....Das Leben verlangt es.[Diese Nachricht wurde von BLD1983 am 17. Sep. 2020 editiert.][Diese Nachricht wurde von BLD1983 am 17. Se ...
|
| In das Form Excel wechseln |
