|
Excel : VBA Projekte mehrfach vorhanden
KlaK am 28.11.2016 um 20:14 Uhr (1)
Hallo Uwe,auf den ersten Blick ist da nichts besonderes zu erkennen. Haben denn die anderen getesteten PC auch Catia drauf?Einzig was ich noch ergänzen würde wäre in der function fillparam() ein Beenden und Schließen der Verbindung zu Catia. Sollte zwar mit Beenden der Funktion automatisch geschehen aber wer weiß schon was da alles im Speicher hängen bleibt ...nach iProduct.Updateeinfach mal einfügenset iProduct = Nothingset iCatia = NothingWenn Du schreibst nach dem Neustart von Excel ist noch alles norma ...
| | In das Form Excel wechseln |
|
Excel : Catscript Excel Tabelle kopieren und einfüge
KlaK am 16.09.2020 um 17:15 Uhr (1)
Hi,Ich kenne jetzt Catia nicht, stehen denn auf den Tabellen besondere Verknüpfungen.Was passiert wenn Du unten manuell rechte Maustaste auf den Arbeitsblattnamen gehst und dann "verschieben oder kopieren"Wenn das auf Catia keine Auswirkungen hat, könnte man auch VBA-Funktionen verwenden.Aber immer schön der Reihe nach GrüßeKlaus [Edit]Ach ja und zum Code: Ein wenig mehr wäre auch hilfreich.Wie ist objXL1 und objXL3 definiert? Warum objXL1("Schein.xlsx").Worksheets("Fremdvergabe") ?Ist denn objXL1 nicht ...
| | In das Form Excel wechseln |
|
Excel : Catscript Excel Tabelle kopieren und einfüge
KlaK am 22.09.2020 um 12:47 Uhr (1)
Hallo BLD,Zitat:Original erstellt von BLD1983: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.[/i]Jein, ich teste erst einmal ob Excel bereits offen und ob das benötigte Arbeitsblatt geladen istCode:Dim oXL As Excel.ApplicationSet oXL = GetObject(, "Excel.Application")If oXL Is Nothing Then Set oXL = New Excel.ApplicationEnd IfDim oWB1 As WorkbookSet oWB1 = oXL.Workbooks("Material. ...
| | In das Form Excel wechseln |
|
Excel : Catscript Excel Tabelle kopieren und einfüge
KlaK am 23.09.2020 um 14:20 Uhr (1)
Ok, Häckchen wieder weg Du kannst ja probehalber mal .Sheets() mit .Worksheets() ersetzen. Sollte zwar keinen Unterschied machen aber wer weiß.Hintergrund: Sheets beinhaltet alle Tabellen, also auch Diagramme, Worksheets nur die Tabellen.Mal ohne die .visible - Anweisungen getestet?Nachdem ich CATIA nicht habe, kann ich hier nur raten.GrüßeKlaus
| | In das Form Excel wechseln |
|
Excel : Catscript Excel Tabelle kopieren und einfüge
KlaK am 25.09.2020 um 09:43 Uhr (1)
Zitat:Original erstellt von BLD1983:2. Lösungsansatz:Mit z.B.Set EingefuegtesBlatt = objXL3.Sheets("Material").Copy (,objXL1.Sheets(2)) kopiert es das Blatt und fügt es auch ins "Schein.xlsx" ein,jedoch kommt die Fehlermeldung "Objekt erforderlich objXL3.Sheets(...)Copy(...)"sheets.copy hat keinen Rückgabewert den es der Variablen EingefuegtesBlatt zuweisen könnte.Möglich wäre:Set EingefuegtesBlatt = objXL1.Sheets("Material")Damit kannst Du überprüfen ob der Kopiervorgang erfolgreich war wenn Du nicht eh e ...
| | In das Form Excel wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
