Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Excel Vorlage öffnen und Schließen mit VB6

Frage Entwicklung VB for Applications

Mitglied: Sani03

Sani03 (Level 1) - Jetzt verbinden

13.02.2008, aktualisiert 21:04 Uhr, 14540 Aufrufe, 1 Kommentar

Hallo Zusammen,

hab vollgendes Problem, und zwar habe ich ein Programm mit VB6 erstellt. Aber als letzter teil fehlt mir noch ein automatisiertes öffnen / schließen / drucken eines Excel dokumentes. Frage:

Bei dem Code was ihr im Anschluss seht bleibt bei mir immer excel als Prozess offen, den kann ich zwar von hand abschießen, aber wenn ich den Button dann das zweite mal drücke, sagt mir das Programm " remote Computer/Laufwerk nicht verfügbar".


Private Sub cmdTestExcel_Click()
Dim Excel As Object


Set Excel = CreateObject("excel.Application")

If Excel Is Nothing Then
MsgBox "Fehler beim Öffnen der Vorlage!", 16, "Fehler"
Exit Sub 'Prozedur beenden im Fehlerfall
End If


Excel.Visible = True

'Vorlage oeffnen
Excel.Workbooks.Open "C:\temp\test.xls"


Excel.Range("B14").Value = "'test"
ActiveWorkbook.Close


Excel.Quit


Excel.Application.Quit
End Sub


Nochmal eine frage,
wie kann ich das Excel Dokument automatisch drucken und danach schließen??
Schonmal vielen Dank für eure Hilfe.


Gruß Sani03
Mitglied: wakko
13.02.2008 um 21:04 Uhr
Moin,
ich würde dir folgende Excel-Automation empfehlen:
Excel-Objektbibliothek einbinden (EXCEL9.OLB aus dem Office-Verzeichnis über Projekt->Verweise einbinden) und dann das Application-Objekt wie folgt erstellen:
01.
Dim ex as new Excel.Application
da Fallen dann einige Fehler (Objekte/Eigenschaften) auf, so sollte das laufen:
01.
Dim ex As New Excel.Application 
02.
ex.Visible = True 
03.
'Vorlage oeffnen 
04.
ex.Workbooks.Open "C:\temp\test.xls" 
05.
ex.ActiveWorkbook.ActiveSheet.Range("B14").Value = "'test" 
06.
 
07.
'drucken... 
08.
ex.ActiveWorkbook.ActiveSheet.PrintOut Copies:=1, Collate:=True 
09.
 
10.
'"Änderungen-speichern" Dialog unterdrücken 
11.
ex.ActiveWorkbook.Saved = True 
12.
 
13.
'alternativ speichern... 
14.
ex.ActiveWorkbook.Save 
15.
 
16.
ex.ActiveWorkbook.Close 
17.
ex.Quit
Gruß,
Henrik
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Mehr als 20 Excel Dateien öffnen gleichzeitig (7)

Frage von PizzaPepperoni zum Thema Microsoft Office ...

Batch & Shell
gelöst Excel Täglich öffnen (5)

Frage von Crank69 zum Thema Batch & Shell ...

Microsoft Office
gelöst Makro wird beim öffnen Vorlage nicht ausgeführt (8)

Frage von Sunny89 zum Thema Microsoft Office ...

Server-Hardware
Kann wav Datei im Handy nicht öffnen (2)

Frage von Chrisch zum Thema Server-Hardware ...

Neue Wissensbeiträge
Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(2)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(5)

Anleitung von BassFishFox zum Thema Windows 10 ...

Administrator.de Feedback

Tipp: Ungelöste Fragen ohne Antwort in Tickeransicht farblich hinterlegen

Tipp von pattern zum Thema Administrator.de Feedback ...

Viren und Trojaner

Neue Magazin Ausgabe: Malware und Angriffe abwehren

Information von Frank zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Windows Systemdateien
Warum System auf "C:" (29)

Frage von DzumoPRO zum Thema Windows Systemdateien ...

LAN, WAN, Wireless
Cisco SG200: Auf bestimmtem vLAN bestimmte TCP-Ports sperren (19)

Frage von SarekHL zum Thema LAN, WAN, Wireless ...

Windows Server
gelöst Update BackupExec 2015 auf 2016 führt zu SQL-Server Problem (16)

Frage von montylein1981 zum Thema Windows Server ...

Cloud-Dienste
gelöst Bitcoins minen über Nacht? (16)

Frage von 1410640014 zum Thema Cloud-Dienste ...