Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
200to204
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
200to204
200to204
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

erste leere zelle aber nicht zeile 1,2 oder 3

erste leere zelle aber nicht zeile 1,2 oder 3
13.01.2003 09:27:59
Steffi
guten morgen,
habe eine kleine frage.

Dim rnge As Range
Dim Spalte As Variant
Spalte = Application.InputBox( _
prompt:="Bitte Spaltenzahl angeben:", _
Default:=2, _
Type:=1)
If Spalte = "" Then Exit Sub
Set rnge = Cells(Rows.Count, CInt(vCol)).End(xlUp)
If ActiveCell.EntireColumn.Cells(1, 1) = "Auftr. Nr.:" Then
Range(ActiveCell, ActiveCell.Offset(0, -1)).Copy
Else
Range(ActiveCell, ActiveCell.Offset(0, 1)).Copy
End If
ActiveSheet.Paste destination:=rnge
If ActiveCell.EntireColumn.Cells(1, 1) = "Auftr. Nr.:" Then
Range(ActiveCell, ActiveCell.Offset(0, -1)).Select
Else
Range(ActiveCell, ActiveCell.Offset(0, 1)).Select
End If
Selection.Delete Shift:=xlUp
End Sub

dieses makro funktioniert soweit ganz gut allerdings soll das nicht bei "Set rnge = Cells blablabla" in eine der ersten drei zeilen wechseln. Wenn die zellen darunter voll sind ist dass kein problem aber wenn nicht werden immer meine formeln in zeile 3 überschrieben.

Vieleicht hat ja einer von euch eine idee für mich
Danke
Steffi

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: erste leere zelle aber nicht zeile 1,2 oder 3
13.01.2003 09:32:34
Steffi
ich bins noch mal
in der achten zeile dieses makros steht einmal "vCol" das heißt spalte.

Anzeige

313 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige