Thema Datum  Von Nutzer Rating
Antwort
Rot Wenn Zelle leer, dann Wert darüber
 07.04.2012 13:58:05 Sebastian
NotSolved
07.04.2012 14:26:05 Holger
Solved
07.04.2012 18:13:17 Sebastian
NotSolved

Ansicht des Beitrags:
Von:
Sebastian		 Datum:
07.04.2012 13:58:05		 Views:
2746		 Rating:
     
Antwort:
  Ja
Thema:
Wenn Zelle leer, dann Wert darüber

Hallo Zusammen,

 

bin absoluter VBA-Laie, daher bräuchte ich einmal Eure Hilfe. Habe folgenden Code, der den Zellinhalt der vorherigen kopiert sofern die Zelle leer ist.

Funktioniert einwandfrei, allerdings nur für Spalte A. Meine Frage: Wie kann ich mit dem Code auch andere Spalten ansprechen?

Sub AdressenFuellen()
    For i = 2 To Cells(65536, 2).End(xlUp).Row
    Cells(i, 1).Activate
    If ActiveCell.Value = "" Then GoTo Fuellen Else GoTo NichtFuellen
Fuellen:
    ActiveCell.Value = ActiveCell.Offset(-1, 0).Value
NichtFuellen:
    Next i
End Sub

 

Vielen Dank für Eure Hilfe!

Gruss Sebastian

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:



  • 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 Wenn Zelle leer, dann Wert darüber
 07.04.2012 13:58:05 Sebastian
NotSolved
07.04.2012 14:26:05 Holger
Solved
07.04.2012 18:13:17 Sebastian
NotSolved