Teneriffa Süd Abflug
17. 06. 2006, 15:04 # 1 BA_LI VBA - Leere Zellen überspringen... Hallo, wie überspringe ich leere Zellen? Habe es wie folgt versucht: Code: Option Explicit Sub Test() Dim Tabelle3 As Worksheet Dim LastRow As Long Dim RowIndex As Long Set Tabelle3 = Sheets("Tabelle3") LastRow = ("A1")(xlDown) For RowIndex = 4 To LastRow If (RowIndex, 3) = "" Then If (RowIndex, 2) = "" Then Exit For RowIndex = RowIndex + 1... Else... End If Next RowIndex End Sub Vielen Dank im voraus... 17. 2006, 15:34 # 2 Hajo_Zi Hallo Hans Bärbel, der Code sieht eigentlich ok aus bis auf die Tatsache das nur jede 2 Zeile geprüft wird falls Spalte 3 leer und Spalte 2 nicht leer. Was geht nicht? In Foren gilt allgemein das Du. Alle Leute, die ich duze, spreche ich mit dem Vornamen an. Ich habe jetzt mal meinen Antwortstil umgestellt: in Beiträgen, in denen kein Name steht, werden die Personen mit "Hans Bärbel" angeredet, da liege ich zumindest beim Geschlecht mit 50% richtig. Fehler überspringen. 17. 2006, 20:58 # 3 Hallo Hajo, habe die Bedingung wie folgt geändert: If (RowIndex, 3) = "" And (RowIndex, 2) <> "" Then Funktioniert aber nicht, wie ich es möchte.
hallo zusammen, Ich habe folgenden Code: On Error Resume Next Range("A5:b" & Cells(, 9)(xlUp)) Selection. SpecialCells(xlCellTypeBlanks) rmulaR1C1 = "=R[-1]C" On Error GoTo 0 Spalte A und B wird selektiert jenachdem wie weit in Spalte J die Zellen ausgefüllt sind. In der nächsten Zeile werden dann leere Zellen mit den Werten oben drüber gefüllt. Problem: jetzt kann es sein das alle Zellen einen Inhalt haben. Soll beim kopieren(runterziehen) der Summewenn Funktion Zeilen überspringen. Dann wird eine Fehlermeldung raus gegeben. Mit "on Error Resume next" unterdrücke ich das. Aber: wenn ein Fehler kommt weil er keine leeren Zellen findet soll der nachfolgende Code: rmulaR1C1 = "=R[-1]C". übersprungen werden. Wie realisiere ich das? Danke
Die Daten in Datei 2 Spalte A werden als Datum in Excel erkannt. Gebe ich eine Match-Formel direkt auf meinem Worksheet in Datei 1 ein, benutze dort den Datumswert aus Zelle B4 in Datei 1 und suche nach einem Match in Spalte A in Datei 2, bekomme ich 5 als Ergebnis, weil dieses Datum in Zelle A5 in Datei 2 steht. Offensichtlich findet Excel also das entsprechende Match für jedes einzelne Datum in Datei 1. Mit VBA finde ich aber kein einziges Match. Stellenangebot der Entwicklungsingenieur für die Elektrotechnik in Linz,. Hat jemand eine Idee, warum das so ist??? Vielen Dank im Voraus. Rene
Das Macro soll die leere Spalte C überspringen und weiter ausgeführt werden. Danke für Deine Hilfe... 17. 2006, 21:09 # 4 mit Deinem Code wird eine Zeile übersprungen wenn Spalte B <> Leer und Spalte C =""" Dein Code macht genau das wofür er geschrieben ist. Die Aufgabe habe ich noch nicht klar Spalte C hat 65536 Zellen und ich habe in Deinem Code nicht gesehen wo Du Prüfst ob Spalte C leer. Gruß Hajo 17. 2006, 23:14 # 5 habe den Fehler gefunden und wie folgt ersetzt: Code:... LastRow = (, 2)(xlUp)... Trotzdem Danke für Deine Hilfe. Geändert von BA_LI (17. 2006 um 23:30 Uhr).
Kutools for Excel, mit seiner mächtigen Kombinieren Dienstprogramm, können Sie mehrere Zellen ohne Aufwand zu einer Zelle verketten. Nach der Installation Kutools for Excel Bitte gehen Sie wie folgt vor: 1. Wählen Sie den Zellenwert aus, den Sie kombinieren möchten. 2. Klicken Sie Kutoolen > Zusammenführen & Teilen > Kombinieren Sie Zeilen, Spalten oder Zellen, ohne Daten zu verlieren, siehe Screenshot: 3. Im ausgeblendeten Dialog: (1. ) Wählen Sie den Zelltyp aus, den Sie kombinieren möchten. Sie können Spalten kombinieren, Zeilen kombinieren und alle Zellen zu Einzelzellen kombinieren. (2. ) Geben Sie ein Trennzeichen für Ihre verketteten Inhalte an. (3. ) Wählen Sie den Ort, an dem das Ergebnis abgelegt werden soll. Sie können das Ergebnis in die obere oder untere Zelle verschieben. (4. ) Geben Sie an, wie mit den kombinierten Zellen umgegangen werden soll. Sie können Inhalte aus diesen kombinierten Zellen behalten oder löschen und diese kombinierten Zellen zusammenführen. 4. Klicken Sie nach Abschluss der Einstellungen auf Ok Klicken Sie auf die Schaltfläche, und die ausgewählten Zeilen wurden separat zu einer Zelle zusammengefasst.