Thema Datum  Von Nutzer Rating
Antwort
Rot Leere Zellen beim Exportieren ignorieren
 11.04.2021 18:24:45 Pu3a
NotSolved
11.04.2021 18:28:55 Pu3a
NotSolved
11.04.2021 20:40:48 Gast96704
***
NotSolved
11.04.2021 22:08:09 Pu3a
NotSolved
11.04.2021 22:41:23 Gast41836
NotSolved

Ansicht des Beitrags:
Von:
Pu3a		 Datum:
11.04.2021 18:24:45		 Views:
1111		 Rating:
     
Antwort:
  Ja
Thema:
Leere Zellen beim Exportieren ignorieren

Hallo zusammen,

leider bin ich mit VBA nicht wirklich vertraut, würde aber gerne ein Export-Makro erstellen.

Ich möchte die erste Spalte exportieren und es lässt sich nicht vermeiden, dass manche Zeilen leer sind.

Es ist doch bestimmt möglich die leeren Spalten beim Export wegzulassen, oder?

 

Folgendes habe ich bis jetzt zusammen:

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Sub Export()
'Variablen definieren
Dim Zieldatei As String
Dim Zeile As Integer
Dim LastRow As Long
 
With ActiveSheet
        LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
    End With
 
On Error GoTo Fehler
 
'Tabellenblatt aktivieren
ThisWorkbook.Worksheets("CNC").Activate
 
Zieldatei = ThisWorkbook.Path & "\NC.txt"
 
Open Zieldatei For Output As #1
 
For Zeile = 1 To LastRow
 
Print #1, Cells(Zeile, 1).Value
 
Next Zeile
 
Close #1
 
MsgBox ("Programm erstellt")
 
Exit Sub
 
Fehler:
MsgBox Err.Description
 
 
End Sub

Vielen Dank im Voraus!

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:
WYSIWYG-Editor, ctl00_Content_editor1



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Leere Zellen beim Exportieren ignorieren
 11.04.2021 18:24:45 Pu3a
NotSolved
11.04.2021 18:28:55 Pu3a
NotSolved
11.04.2021 20:40:48 Gast96704
***
NotSolved
11.04.2021 22:08:09 Pu3a
NotSolved
11.04.2021 22:41:23 Gast41836
NotSolved