Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
400to404
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
400to404
400to404
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Leere Zellen Bereich kopieren

Leere Zellen Bereich kopieren
Florian
Hallo Forum!
Ich habe folgendes Problem: Ich will einen Bereich kopieren und dabei die Leerzeilen und die Leerzellen in den Zeilen entfernen. Die Leerzeilen schaffe ich mit:
Worksheets("Tabelle1").Range("a1:l100").SpecialCells(xlCellTypeBlanks).Delete xlShiftUp
Nun will ich auch die Leerzellen entfernen, schaffe es aber nur für jeweils eine Zeile mit
Rows("1:1").Select
Selection.SpecialCells(xlCellTypeConstants, 23).Select
Selection.Copy
Range("A20").Select
ActiveSheet.Paste
Wie kann ich diese Problem für den gesamten Bereich lösen? Für Tips oder Hilfe wäre ich sehr dankbar!
Schöne Grüße,
Florian

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Leere Zellen Bereich kopieren
Uwe
Hallo Florian,
probiers mal damit:

Sub ZellenMitInhaltKopieren()
Dim nZ As Integer
Dim Ber As Range
Dim qZ As Range
Dim zZ As Range
Set Ber = Selection 'oder Worksheets("Tabelle1").Range("a1:l100")
Set zZ = Range("A19")
On Error Resume Next
For nZ = 1 To Selection.Rows.Count
Set qZ = Selection.Rows(nZ).SpecialCells(xlCellTypeConstants, 23)
If Not qZ Is Nothing Then
Set zZ = zZ.Offset(1, 0)
qZ.Copy zZ
Set qZ = Nothing
End If
Next nZ
End Sub

Gruß Uwe
AW: Leere Zellen Bereich kopieren
24.03.2004 10:13:51
Florian
Hi Uwe!
Saugut, herzlichen Dank!
Schöne Grüße,
Florian
Anzeige

300 Forumthreads zu ähnlichen Themen

Zwei Spalten in jeweils zwei Tabellen miteinander
Lutz

Liebe Leute,
ich habe zwei recht umfangreiche Tabellen mit Lieferdaten und dies in zwei von einander unabhängigen Tabellen.
In der Tabelle1 stehen neben anderen die Spalten Bestellnr. und Materialnr. sowie Lieferantennr. In der Tabelle2 stehen wiederum die Spalten Bestellnr. und Materia...
08.08.2008 15:56:55
Thread-ID: 1000336
4 Beiträge
Anzeige
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
Zählen nichtleerer Zellen
Stefan

Hallo zusammen,
ich erbitte erneut Eure Hilfe. Es geht darum Zellen mit Inhalt einer Liste der Fuhrparkverwaltung zu zählen. In Spalte C:J habe ich jeweils die verschiedenen Fahrzeuge. In den Zeilen 7:372 trage ich dann ein, wer welches Fahrzeug belegt hat. Geht eine Fahrt über mehrere Tage...
04.11.2008 08:20:00
Thread-ID: 1021461
3 Beiträge
Anzeige
Leere zellen nicht leer und Zahlen keine Zahlen
P.Mackes

Per google bin ich zwar auf einige themen gestoßen, die sich mit diesen oder ähnlichen Probleme beschäftigen, aber so richtig gepasst hat für mich nichts oder die lösungen waren vba basiert und das kann ja nicht der stein der Weisen sein.
https://www.herber.de/bbs/user/56887.xls
es tre...
18.11.2008 11:08:00
Thread-ID: 1025551
10 Beiträge
Kopieren von Nichtleeren Zellen per Formel
Nichtleeren

Moin,
auf der Arbeit soll ich eine Tabelle anpassen:
In Tabellenblatt1 ist eine Matrix M6:P109, in einigen Zeilen (Artikelnummern in loser Reihenfolge) stehen Werte, (die Artikel, die im Bürobestand fehlen) in den meisten nicht.
Die Zeilen, in denen Werte stehen, sollen nun in Tabel...
10.01.2009 20:43:46
Thread-ID: 1038525
4 Beiträge
Leere Zellen nicht exportieren
Torsten

Hallo zusammen,
ich habe folgendes Problem:
Und zwar importiere ich zunächst ein Textfile aus einem OD Reader in Excel, führe ich dort Berechnungen mit den importierten Werten durch und erstelle eine Tabelle die ich dann als .csv exportiert in einen Pipettierrobotter lade. Das funktioni...
20.03.2009 10:50:28
Thread-ID: 1062085
3 Beiträge
Kopieren von nicht zusammenhängenden Zellen
nicht

Hallo zusammen,
ich möchte nicht zusammenhängende Zellen gleichzeitig kopieren. Hierfür markiere ich die entsprechenden Zellen und versuche dann zu kopieren.
Ab einer bestimmten Anzahl von Zellen ist dies allerding nicht mehr möglich.
Es erscheint dann folgende Fehlermeldung:
...
16.06.2009 12:02:18
Thread-ID: 1081826
2 Beiträge
Leere und Nichtleere Zellen einer Spalte rechnen
Urmila

Hallo,
habe ien Problem, ich habe eine Liste, in Spalte A stehen Werte (Zahlen), in der Spalte B stehen Namen.
Nun will ich, dass er mir in der Zelle D1 alle Werte aus spalte A ausrechnet, wo die Zellen in Spalte B Inhalte haben, und in Zelle E1 wo kein Inhalt steht.
Ich hoffe ich k...
30.06.2009 12:41:41
Thread-ID: 1085323
4 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
3
4
3
2
2
9
3
2
1
3
6
4
4
2
2
5
11
5
10
2
2
1
2
6
2