Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1784to1788
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1784to1788
1784to1788
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeile mit leerer Zelle kopieren

Zeile mit leerer Zelle kopieren
13.10.2020 14:47:50
Blume
Hallo zusammen,
ich habe eine Frage: In Spalte A sind manchmal leere Zellen. Wenn diese Zelle leer ist, dann soll es die ganze Zeile in das Tabellenblatt "Backup" an das Ende hinzufügen. Das Gilt aber wirklich nur für die Zellen, bei denen Die Zelle in Spalte A leer ist. Am besten wäre es, es würde es dann automatisch nach dem Datum in Spalte B sortieren.
Kann mir jemand helfen?

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile mit leerer Zelle kopieren
13.10.2020 17:58:35
Hajo_Zi
Benutze Autofilter und Kopiere den sichtbaren Bereich, Start, Bearbeiten, Suchen..., Gehe zu, Inhalte, sichtbare Zellen.
Excel hat auch einen Makrorecorder.

Frage...
13.10.2020 18:09:35
Werner
Hallo,
da stellen sich zwei Fragen:
1. Sind die Zellen in Spalte A tatsächlich leer oder ist da ggf. ein Formel drin die leer ausgibt?
2. Bis zu welcher Spalte in der Quelltabelle geht dein Datenbereich?
Gruß Werner
AW: Frage...
13.10.2020 20:11:06
Blume
Hallo Werner,
die Zellen in Spalte A sind wenn dann tatsächlich leer.
Es geht bis zu Spalte Z.
Der Hintergrund ist der, dass die Zeile als Backup in das andere worksheet kopiert werden soll und dann aus der originaltabelle gelöscht werden soll.
Anzeige
AW: Frage...
13.10.2020 22:03:56
Werner
Hallo,
Option Explicit
Public Sub Leere_Kopieren()
Dim loLetzteQ As Long, loLetzteZ As Long
Application.ScreenUpdating = False
With Worksheets("Tabelle1")
loLetzteQ = .Cells(.Rows.Count, "B").End(xlUp).Row
On Error Resume Next
.Range(.Cells(1, "A"), .Cells(loLetzteQ, "A")).SpecialCells(xlCellTypeBlanks).EntireRow. _
Copy
If Err.Number = 1004 Then Exit Sub
With Worksheets("Backup")
loLetzteZ = .Cells(.Rows.Count, "B").End(xlUp).Offset(1).Row
If .Cells(1, "B") = "" Then loLetzteZ = 1
.Cells(loLetzteZ, "A").PasteSpecial Paste:=xlPasteValues
loLetzteZ = .Cells(.Rows.Count, "B").End(xlUp).Row
.Range(.Cells(1, "B"), .Cells(loLetzteZ, "Z")).Sort Key1:=.Range("B1"), Order1:= _
xlAscending, _
Header:=xlNo, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal
End With
.Range(.Cells(1, "A"), .Cells(loLetzteQ, "A")).SpecialCells(xlCellTypeBlanks).EntireRow. _
Delete
End With
End Sub
Gruß Werner
Anzeige
AW: Frage...
14.10.2020 07:59:24
Blume
Hallo Werner,
es funktioniert, wenn ich es mit wenigen Zeilen probiere. Allerdings kopiert und löscht es die Zeilen ab Zeile (ca. 20) nicht mehr. Woran kann das liegen?
In dem Dokument sind immer mal wieder leere Zellen in dieser Spalte A. Mal in Zeile 2,mal 4, 80 es müsste die komplette Spalte durchlaufen.
AW: Frage...
14.10.2020 09:09:56
Werner
Hallo,
keine Ahnung. Bei mir tut das Makro das, was es tun soll. Deine Datei kenne ich nicht.
Kann es sein, dass deine Spalte B ab Zeile 20 leer ist?
In Spalte B wird im Makro die letzte belegte Zeile ermittelt.
Sollte die Spalte B ab Zeile 20 leer sein, dann geht der "Löschbereich" Spalte A auch nur bis Zeile 20.
Gruß Werner
Anzeige
AW: Frage...
14.10.2020 13:03:00
Blume
Hallo Werner,
ja, bei mir funktioniert es auch im oberen Bereich. Spalte B ist bei mir immer gefüllt, daran sollte es nicht liegen.
AW: Frage...
14.10.2020 13:03:02
Blume
Hallo Werner,
ja, bei mir funktioniert es auch im oberen Bereich. Spalte B ist bei mir immer gefüllt, daran sollte es nicht liegen.
AW: Frage...
14.10.2020 13:04:55
Blume
Ich habe es getestet, in der Zelle ist kein Wert, keine Formel, nichts. Trotzdem funktioniert das Makro nur vollständig, wenn man z.B. vorher einen Wert aus der Zelle in Spalte A löscht.
AW: Frage...
14.10.2020 15:35:41
Blume
Ich habe es getestet, in der Zelle ist kein Wert, keine Formel, nichts. Trotzdem funktioniert das Makro nur vollständig, wenn man z.B. vorher einen Wert aus der Zelle in Spalte A löscht.
Anzeige
AW: Frage...
14.10.2020 18:43:36
Werner
Hallo,
und damit soll ich jetzt was anfangen?
Lad mal deine Mappe hoch. Ich denke, dass die Zellen in Spalte A nicht wirklich leer sind.
Wie kommen denn die Daten da hin?
Gruß Werner
AW: SpecialCells..
15.10.2020 13:52:24
Gerd
Hallo,
lass mal diese Codezeile vorweg laufen:
Columns(1).Value = Columns(1).Value
Die Specialcells-Methode hat ein Problem mit nicht genutzten Zellen bzw. solchen außerhalb des
benutzten Bereichs (UsedRange). Dafür spricht auch deine Feststellung.
Gruß Gerd
AW: SpecialCells..
19.10.2020 08:05:14
Blume
Hallo Gerd,
ja, daran lag es! Vielen Dank für Hilfe, jetzt funktioniert es komplett.
Herzlichen Dank!
Anzeige

304 Forumthreads zu ähnlichen Themen

Gültigskeitsprüfung mit leerer Zelle
Franz

Guten Abend!
Habe 9 Spalten mit Dropdowns gefüllt. Wie bekomme ich den nachfolgenden Code (Quelle: Archiv) eleganter hin, dh. ohne for next Schleife und dadurch schneller. Der Datenbereich heistt "Printarea".
Private Sub Worksheet_Change(ByVal Target As Range) Dim i As Integer For i =...
14.09.2008 20:56:00
Thread-ID: 1009627
11 Beiträge
Anzeige
Inhalt von UF wird nicht angezeigt
UF

Hi Forum,
ich starte meine UF mit dem folgenden Code:
Sub auto_open() Application.WindowState = xlMinimized UF_BitteWarten.Show vbModeless Application.Run "RESETMASK" UF_BitteWarten.Hide UF_Maske.Show End Sub
Wie zu erkennen, wird beim Start ein Reset ausgeführt, der einige Sekun...
26.09.2008 14:29:02
Thread-ID: 1012639
16 Beiträge
Gültigkeitsliste ohne Zellenbereich
Reinhard

Hallo Wissende,
Sub Makro1() With Range("P2").Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:="a;b;c" .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "" .InputMessage = "" .ErrorMessage = "" .ShowInput...
02.11.2008 16:48:00
Thread-ID: 1021179
4 Beiträge
Anzeige
langer Text wird nicht mehr angezeigt
u_hoernchen

Ich muss einen langen Text (ca. 1.500 Zeichen) in eine Excel-Zelle schreiben (geht leider nicht anders, also das bitte nicht in Frage stellen). Nun wird beim Ausdruck und bei der Bildschirmanzeige aber die letzte Zeile nicht mehr umgebrochen (Zeilenumbruch ist formatiert), in der Zelle steht ab...
05.01.2009 11:10:25
Thread-ID: 1036916
4 Beiträge
Ribbon-DropDown-Listenfeld variabel füllen?
Kasimir

Hallo an alle!
Ich habe da mal eine Frage bezüglich der Excel 2007 Ribbons.
Zum Verständnis, ich habe eine xls-Datei, in der ich beim Starten eine neue Symbolleiste erzeuge. Diese neue Symbolleiste hat u.a. ein msoControlComboBox, die ich über eine Schleife mit bestimmten Tabellenblattn...
17.01.2009 07:23:00
Thread-ID: 1040862
3 Beiträge
Zeile mit optisch leerer Zelle löschen
Werner

VBA-Level: befriedigend
Hallo Freunde,
eine Tabelle (Worksheet) hat mehrere Spalten, beginnend ab Spalte A. Spalte A enthält Stringwerte.
Einige der Zellen in Spalte A sind optisch leer.
Nun sollen alle diejenigen Zeilen, bei denen die Zellen in Spalte A optisch leer sind, gelös...
13.03.2009 11:21:32
Thread-ID: 1059795
10 Beiträge
Wert wird nicht angezeigt
Markus

Hallo,
habe folgendes Problem:
Ich lasse mir einen Wert per VBA ausrechnen und dann mit Range... im Tabellenblatt anzeigen.
Das Problem ist, dass der Wert nicht angezeigt wird.
Wenn ich denn Programmcode per Einzelschritt debugge, dann wird der Wert komischerweise angezeigt!
...
20.07.2009 11:00:55
Thread-ID: 1089939
6 Beiträge
Geöffnete Datei wird nicht angezeigt...
Ruediger

Hallo zusammen,
ich habe eine Datei - mit einigen Verknüpfungen auf eine andere Datei - versuchen wollen zu öffnen. Ich werde auf gefragt, ob ich aktualisieren will oder nicht. Drücke ich aktualisieren als auch nicht aktualisieren, wird die Datei zwar geöffnet, aber nicht angezeigt.
Wo...
22.07.2009 17:02:42
Thread-ID: 1090605
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
10
1
15
3
2
3
2
9
5
2
3
7
2
5
11
3
5
2
5
2
2
6
7
1
2