Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Makro von Personal.xlsb ausführen

Frage Entwicklung VB for Applications

Mitglied: Nathalem

Nathalem (Level 1) - Jetzt verbinden

30.04.2013, aktualisiert 12:14 Uhr, 3607 Aufrufe, 3 Kommentare, 1 Danke

ich habe ein Makro geschrieben das in der Personal.xlsb liegt und von einem weiteren Makro in einer Excel tabelle ausgeführt werden soll

Ich habe über die Makro aufzeichnen Funktion ein einfaches Makro angelegt das in ein paar Spaltenbreiten anpasst einige Felder färbt und 3 Einträge verändert.
Dieses habe ich "formatierung" genannt.
Wenn ich nun die Datei "ActiveDirectoryExport.xlsx" und das Makro manuell öffne und das Makro ausführe funktioniert es auch wunderbar. Nun möchte ich es aber als Teil eines größeren Programms ausführen.
Dazu habe ich diese VBS geschrieben

-----------------------------------Code-----------------------------------
Set oExcel = WScript.CreateObject("Excel.Application")
On Error Resume Next
With oExcel
.Visible = FALSE
Application.DisplayAlerts = False
Set oDoc = .Workbooks.Open("c:\ADDGE\ActiveDirectoryExport.xlsx")
.Run "PERSONAL.XLSB!formatierung"
oDoc.Save
oDoc.Close
.Quit
End With
---------------------------------CodeEnde----------------------------------

Wenn ich diese per Doppelklick oder auch über eine Batch ausführe passiert gar nichts. Es erscheint als auch keine Fehlermeldung
Wenn ich .Visible auf TRUE setze sehe ich wie die Datei aufgeht und sich gleich wieder schließt.
Könnt ihr mir weiterhelfen?

Edit: wenn ich den Close und den Quit befehl wegnehme sehe ich das nach öffnen einfach garnichts passiert
Mitglied: colinardo
30.04.2013, aktualisiert um 12:25 Uhr
Hallo Nathalem,
die Syntax um ein Makro aus einer anderen Arbeitsmappe aufzurufen sieht so aus:
.Run "'C:\PfadzurDatei\PERSONAL.XLSB'!formatierung"
Um den Pfad zur anderen Excel-Datei müssen einzelne Anführungszeichen verwendet werden wenn die Datei noch nicht geöffnet wurde.

Grüße Uwe
Bitte warten ..
Mitglied: Nathalem
30.04.2013 um 12:36 Uhr
Hat funktioniert.
Ich habe nur einen Moment gebraucht um zu bemerkten das ich den Pfad zur Personal.xlsb auch eintragen muss.
Vielen Dank
Bitte warten ..
Mitglied: colinardo
30.04.2013 um 14:42 Uhr
Dann bitte Beitrag als gelöst markieren, Danke !
http://www.administrator.de/faq/32
Bitte warten ..
Ähnliche Inhalte
Outlook & Mail
Makro ausführen: Liste ist leer
gelöst Frage von mupan7Outlook & Mail3 Kommentare

Bin sicher kein VBA-Neuling, aber mit Outlook, seinem riesigen Objektmodell und seinem <gnx$$§%&> Sicherheitssystem habe ich noch kaum Erfahrung. ...

Microsoft Office
Makro automatisch ausführen bei Zellenänderung VBA
Frage von firelessMicrosoft Office4 Kommentare

Hallo Community, ich habe ein Makro, dass mir automatisch die Zeilenhöhe mit Zeilenumbruch anpasst, wenn der Text zu lang ...

VB for Applications
EXCEL VBA 2013 bei inaktiven Fenster Makro ausführen
gelöst Frage von Just4fun1990VB for Applications2 Kommentare

Hallo Administrator.de User, dieses mal kein Problem sondern eine Frage :) . Ist es irgendwie möglich, wenn das Excel ...

VB for Applications
VBScript alle Word dateien einem Verzeichnis und Unterverzeichnissen öffnen und Makro Ausführen
Frage von alex-fwVB for Applications5 Kommentare

Hallo, ich versuche ein VBSScript zu basteln, welche mir weiter helfen kann. Im einem Verzeichnis und Unterverzeichnissen sind mehrere ...

Neue Wissensbeiträge
Batch & Shell

Open Object Rexx: Eine mittlerweile fast vergessene Skriptsprache aus dem Mainframebereich

Information von Penny.Cilin vor 14 StundenBatch & Shell8 Kommentare

Ich kann mich noch sehr gut an diese Skriptsprache erinnern und nutze diese auch heute ab und an noch. ...

Humor (lol)

"gimme gimme gimme": Automatischer Test stolpert über Easter Egg im man-Tool

Information von Penny.Cilin vor 16 StundenHumor (lol)6 Kommentare

Interessant, was man so alles als Easter Egg implementiert. Ist schon wieder Ostern? "gimme gimme gimme": Automatischer Test stolpert ...

MikroTik RouterOS

Mikrotik - Lets Encrypt Zertifikate mit MetaROUTER Instanz auf dem Router erzeugen

Anleitung von colinardo vor 1 TagMikroTik RouterOS8 Kommentare

Einleitung Folgende Anleitung ist aus der Lage heraus entstanden das ein Kunde auf seinem Mikrotik sein Hotspot Captive Portal ...

Sicherheit

Sicherheitslücke in HP-Druckern - Firmware-Updates stehen bereit

Information von BassFishFox vor 1 TagSicherheit1 Kommentar

Ein weiterer Grund, dass Drucker keinerlei Verbindung nach "auswaerts" haben sollen. Unter Verwendung spezieller Malware können Angreifer aus der ...

Heiß diskutierte Inhalte
Windows Server
RDP macht Server schneller???
Frage von JaniDJWindows Server17 Kommentare

Hallo Community, wir betrieben seit geraumer Zeit diverse virtuelle Maschinen und Server mit Windows Server 2012. Leider haben wir ...

Windows 10
Windows 10 dunkler Bildschirm nach Umfallen
Frage von AkcentWindows 1015 Kommentare

Hallo, habe hier einen Windows 10 Rechner der von einem User umgefallen wurde (Beine übers Knie, an den PC ...

Windows 10
Bitlocker nach Verschlüsselung nicht mehr aufrufbar!
gelöst Frage von alexlazaWindows 1013 Kommentare

Hallo, ich besitze ein HP ZBook 17 G4 mit einem Windows 10 Pro Betriebssystem. Bei diesem Problem handelt sich, ...

Batch & Shell
Neuste Datei via PowerShell kopieren
gelöst Frage von kaiuwe28Batch & Shell11 Kommentare

Hallo zusammen, ich hatte mir mit Hilfe der Suche im Forum einen kleinen Code von colinardo rausgesucht und versucht ...