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 VBScript in Excel schreiben, was mach ich falsch?

Mitglied: otti1977

otti1977 (Level 1) - Jetzt verbinden

03.08.2011 um 16:24 Uhr, 7114 Aufrufe, 4 Kommentare

Hi zusammen,

eigentlich ist es einfach, ich möchte ein Excel-File erstellen und dann mit Werten füllen.

Das funktioniert eigentlich ganz gut, bis ich in eine Zelle eine Formel (SVerweis) einfügen will.

hier mal ein Auszug aus dem Quelltext:

dim i,j,objXL,linecount,mystring

Set objXL = WScript.CreateObject("Excel.Application")
objXL.Visible = True
objXL.WorkBooks.Add
objXL.Cells(1, 1).Value = "PC-Name"
objXL.Cells(1, 2).Value = "App-Path"
objXL.Cells(1, 3).Value = "User"
objXL.Cells(1, 4).Value = "TelNr"
objXl.Cells(1, 5).Value = "Bemerkung"
objXL.Rows("1:1").Select
objXL.Selection.Font.Bold = True
linecount = 2
'warnschwellwert = 1
'For j=0 to ubound(myarr)

'mystring = =SVERWEIS($A2;'H:\My Documents\Dokumente\Excel\INVENTAR\[chlicket-20110801-mit_Typübersicht.xls]Tabelle1'!$B$2:$H$306;6)
mystring = "=SVERWEIS($A2;" & chr(34) & "H:\My Documents\Dokumente\Excel\INVENTAR\[chlicket-20110801-mit_Typübersicht.xls]:Tabelle1" & chr(34) & "!$B$2:$H$306;6)"
msgbox mystring 'das geht ja noch
objXL.Cells(linecount, 3).Formula = mystring

In der letzten genannten Zeile flippt er dann aus und erzählt mir was von "unbekannter Laufzeitfehler", Code 800A03EC, "Laufzeitfehler in Microsoft VBScript"

Evtl. ist ja einer von Euch fitter als ich und kann mir nen Hinweis geben, wo es denn hapert¿

Danke und

Gruß aus Oberfranken

otti
Mitglied: steini84
03.08.2011 um 18:57 Uhr
Hallo,

habe dein Script gerade durchgespeilt.

Als erstes musst du FormulaLocal anstatt Formula benutzen, da SVerweis nur in einem deutschen Excel gültig ist.
Als zweites kannst du nicht Chr(34), also Gänsefüsschen, benutzen sondern musst das Hochkomma (') nehmen,
Anschließend funktioniert es bei mir ohne Anwendungsfehler.

01.
mystring = "=SVERWEIS($A2;'H:\My Documents\Dokumente\Excel\INVENTAR\[chlicket-20110801-mit_Typübersicht.xls]Tabelle1'!$B$2:$H$306;6)" 
02.
MsgBox mystring 
03.
objXL.Cells(linecount, 3).FormulaLocal = mystring
MfG steini84
Bitte warten ..
Mitglied: otti1977
03.08.2011 um 19:43 Uhr
Hi Steini,

FormulaLocal kannte ich nocht nicht, kennst Du evtl n gutes Handbuch (online), dann kann ich mir dumme Fragen in Zukunft sparen. Hab mir den Quelltext aus dem Netz zusammengeklaubt, bis ich was hatte was (halbwegs) passt

Danke Dir vielmals und

Gruß aus Oberfranken

otti
Bitte warten ..
Mitglied: steini84
04.08.2011 um 12:35 Uhr
Hi,

einige Sachen habe ich mir bei Herber.de angelesen.

Ansonsten google ich nach einem spez. Problem, wenn ich nicht weiter komme.

MfG Steini84
Bitte warten ..
Mitglied: otti1977
04.08.2011 um 13:24 Uhr
Hi Steini,

danke für den Tip. Werd ich mir mal bookmarken.

mfg

otti
Bitte warten ..
Ähnliche Inhalte
PHP
KW berechnen, was mach ich falsch?
gelöst Frage von icegetPHP2 Kommentare

Hallo Community, ich arbeite an einem kleinen Kalender, und habe folgendes Problem: Da ich auch eine Wochenansicht in meinem ...

Monitoring

Mailsend.exe und TheDude - was mache ich falsch?

Frage von YannoschMonitoring1 Kommentar

Guten Tag zusammen! habe eine kurze Frage zu meinem TheDude-Thema. Ich würde gerne aus TheDude E-Mails von einem von ...

Linux Netzwerk

Linux kein Update möglich, was mache ich falsch?

gelöst Frage von DennisWeberLinux Netzwerk9 Kommentare

Hallo Leute, ich habe mir Linux Mint auf einer VM installiert. Kann zwar über den Browser ins Internet aber ...

DNS

DNS Einstellungen werden nicht übernommen! Was mache ich falsch?

gelöst Frage von KlausDiDNS6 Kommentare

Hallo, wir brauchen Hilfe! Unser Webhoster ist mal wieder nicht erreichbar, ein Grund warum wir sowieso schon wechseln. Wir ...

Neue Wissensbeiträge
Windows Server

SBS 2011: Installation von KB4457144 schlägt beim Reboot fehl - Von Dienst gesperrte Schriftart ursächlich

Tipp von the-buccaneer vor 3 StundenWindows Server

Moinsen zusammen! Das hat mich einige graue Haare gekostet: Ein SBS 2011 weigerte sich schon im August, das monatl. ...

Windows Netzwerk
Browser-Lags und IPv6
Erfahrungsbericht von NixVerstehen vor 9 StundenWindows Netzwerk1 Kommentar

Hallo zusammen, wir betreiben als kleines Speditionsunternehmen ein überschaubares Windows-Netzwerk mit Win10-Clients sowie einem Server 2016 Essentials als "eierlegende ...

Humor (lol)

Erstaunlich, Windows mit extremer Laufzeit (Server) lol

Tipp von mathu vor 11 StundenHumor (lol)5 Kommentare

Was es so alles gibt. :-)

Windows Netzwerk

CGM Praxisarchiv funktioniert auf Clients nach Update auf 4.14 nicht mehr

Tipp von MOS6581 vor 1 TagWindows Netzwerk

Moin, ein Kunde setzt das CGM-Praxisarchiv ein. Mehrplatzinstallation mit SQL-Server. Nachdem letzte Woche auf die 4.14 aktualisiert wurde, funktionierte ...

Heiß diskutierte Inhalte
Hyper-V
Windows Serer 2016 Standard virtualisieren
gelöst Frage von fritte87Hyper-V33 Kommentare

Hallo zusammen, ich muss für eine kleine Firma ein entsprechendes neues kleines Konzept bauen. Ich habe einen Server Standard ...

LAN, WAN, Wireless
Kombiniere mehrere 4G Router zu einem Netzwerk - Anwendung kleine LAN (10-20 Leute)
Frage von HulkTheHeroLAN, WAN, Wireless24 Kommentare

Guten Mittag liebes Administrator - Fourm, ich hoffe ich habe das richtige Thema ausgewählt - ansonsten bitte gerne verschieben ...

Windows Server
Fileserver von 2012 R2 auf 2012R2
gelöst Frage von ThabeusWindows Server23 Kommentare

Moin moin, leider war in der Vergangenheit der Fokus des Betriebs nicht auf Langfristigkeit ausgelegt. Daher stehe ich jetzt ...

Router & Routing
Größere Zahl VPN-Verbindungen mit Fritz-Box einrichten
Frage von miscmikeRouter & Routing15 Kommentare

Hallo Zusammen, ich supporte verschiedene Kunden mit bestehenden LAN-LAN-Kopplungen via FritzBox (7490, FritzOS 7.01) . Anwendungen sind z.B. Kaspersky-KSC ...