vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
excel print - Frage 
Autor: JBL
Datum: 13.06.12 11:09
Hallo,

ich habe in excel auf dem Datenblatt ein CommandButton1_Click() eingefügt
dann den Code zum drucken von bestimmten Zeilen geschrieben: 

Private Sub CommandButton1_Click()
 
'Datei zum Schreiben öffnen
Open "c:\test.txt" For Output As #1
 
'Drucken
Print #1, Range("C1") & vbTab; Range("D1") & vbTab; Range("E1") & vbTab; Range( _
  "F1") & vbTab; Range("G1") & vbTab; Range("H1")
Print #1, Range("C2") & vbTab; Range("D2") & vbTab; Range("E2") & vbTab; Range( _
"F2") & vbTab; Range("G2") & vbTab; Range("H2")
Print #1, Range("C3") & vbTab; Range("D3") & vbTab; Range("E3") & vbTab; Range( _
"F3") & vbTab; Range("G3") & vbTab; Range("H3")
Print #1, Range("C4") & vbTab; Range("D4") & vbTab; Range("E4") & vbTab; Range( _
"F4") & vbTab; Range("G4") & vbTab; Range("H4")
Print #1, Range("C5") & vbTab; Range("D5") & vbTab; Range("E5") & vbTab; Range( _
"F5") & vbTab; Range("G5") & vbTab; Range("H5")
Print #1, Range("C6") & vbTab; Range("D6") & vbTab; Range("E6") & vbTab; Range( _
"F6") & vbTab; Range("G6") & vbTab; Range("H6")
Print #1, Range("C7") & vbTab; Range("D7") & vbTab; Range("E7") & vbTab; Range( _
"F7") & vbTab; Range("G7") & vbTab; Range("H7")
Print #1, Range("C8") & vbTab; Range("D8") & vbTab; Range("E8") & vbTab; Range( _
"F8") & vbTab; Range("G8") & vbTab; Range("H8")
Print #1, Range("C9") & vbTab; Range("D9") & vbTab; Range("E9") & vbTab; Range( _
"F9") & vbTab; Range("G9") & vbTab; Range("H9")
Print #1, Range("C10") & vbTab; Range("D10") & vbTab; Range("E10") & vbTab; _
Range("F10") & vbTab; Range("G10") & vbTab; Range("H10")
Print #1, Range("C11") & vbTab; Range("D11") & vbTab; Range("E11") & vbTab; _
Range("F11") & vbTab; Range("G11") & vbTab; Range("H11")
 
'Datei schließen
Close #1
End Sub
Die Ausgabe schaut dann so aus:
1 2 3 4 5 6
usw.
usw.

Nun meine Frage:
Es wird alles sauber (vbTab) in die Datei gedruckt
nur nach der 5.Zahl und 6.Zahl fügt er noch eine Leerzeile ein
hm.... warum ?
Eigentlich hätte ich gerne folgenden Ausdruck:
1,2,3,4,5,6
usw.
usw.
Also durch Komma getrennt und direkt nach der letzten Zahl 6 umschalten zur nächsten Druckzeile


kann da einer helfen?

LG
Angelina
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
excel print - Frage1.345JBL13.06.12 11:09
Re: excel print - Frage911MMBS13.06.12 11:23
Re: excel print - Frage934JBL13.06.12 11:38
Re: excel print - Frage901MMBS13.06.12 12:13
Re: excel print - Frage859JBL13.06.12 12:30
Re: excel print - Frage840MMBS13.06.12 13:29
Re: excel print - Frage907MMBS13.06.12 13:32
Re: excel print - Frage923JBL13.06.12 13:47

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel