Live-Forum - Die aktuellen Beiträge
Datum
Titel
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
26.04.2024 15:27:20
Excel öffnet nach Auswahl einer Excel diese leer
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
476to480
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
476to480
476to480
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA: 3 zellen runter springen

VBA: 3 zellen runter springen
30.08.2004 10:08:58
Nico
Hi @ll
kann mir jemand sagen, wie ich per vba von zelle a1 3 zellen runterspringen kann? wie kann ich den wert dann in zb A10 ausgeben lassen?
Danke und Gruß
Nico

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: 3 zellen runter springen
30.08.2004 10:12:14
Basti
Cells(1,1) = a
Cells(1+3,1) = b
Cells(10,1) = b oder a?
keine ahnung was du genau wissen willst, also was die frage stellung her gibt, kann das so ausehen. Ansonsten bitte mehr erläutern. Danke
AW: VBA: 3 zellen runter springen
30.08.2004 10:24:40
Nico
Hi Basti
ich hab bei meinem tabellenblatt einen autofilter gesetzt. wenn ich jetzt eine anschrift filtern will, soll er mir diese anschrift in zelle a10 ebenfalls anzeigen. ich wollte dann von a1 3 zellen runterspringen, da ja zellen ausgeblendet werden. Hoffe, es ist etwas deutlicher geworden. spalte b o.ä. sind außen vor.
Gruß
Nico
AW: VBA: 3 zellen runter springen
30.08.2004 10:26:54
Nico
das makro müßte also ständig laufen, damit es jedesmal nachdem ich einen neuen betrieb ausgewählt habe, diesen anzeigt.
Anzeige
AW: VBA: 3 zellen runter springen
Monika
Hi!
Versuch's mal so:
dim variable 'Speicherdatenfeld dimensionieren
range("a1").activate 'A1 aktivieren
variable = activecell.value 'Wert von A1 in Speicherdatenfeld lesen
activecell.offset(3,0).activate '3 Zellen von A1 nach unten springen
und zum ausgeben in einer anderen Zelle wieder:
range("a10").activate 'jeweilige Zelle aktivieren
activecell.value = variable
liebe grüße, Monika
AW: VBA: 3 zellen runter springen
30.08.2004 11:21:21
Nico
Hi
na das sieht ja schonmal gar nicht so schlecht aus.
problem ist jetzt allerdings, dass anscheinend a4 angewählt wird. beim autofilter kann u.U. in a4 allerdings nichts drinstehen. er müsste dann zu der nächsten zelle springen, in der ein wert steht.
hast du da vll noch eine idee?
Danke
Nico
Anzeige
AW: VBA: 3 zellen runter springen
30.08.2004 11:39:10
Nico
korrektur:
es müsste der wert der ersten nicht ausgebledeten zelle ausgegeben werden.
AW: VBA: 3 zellen runter springen
Monika
Hi!
Sorry, dass ich das letzte mal gleich abgehauen bin ... stress, stress, stress!
vielleicht hast du inzwischen ja schon eine lösung gefunden, dennoch mein vorschlag:
für die suche nach der ersten befüllten zelle:
do until activecell.value "" 'so lange, bis die aktivierte Zelle nicht leer ist...
activecell.offset(1,0).activate '...eine Zeile nach unten springen
loop
activecell.value = blabla 'was auch immer du mit dem Wert der ersten befüllten
'Zelle machen willst
für die suche nach der ersten sichtbaren zelle:
do until activecell.visible = true
activecell.offset(1,0).activate
loop
activecell.value = ...
hoffe, dass es klappt!
liebe grüße, monika
Anzeige

301 Forumthreads zu ähnlichen Themen

VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
Anzeige
Mit VBA In Zelle Excelformel schreiben
Gho-Reg

Hi Leute
Ich habe hier diesen netten VBA Code geschrieben und leider wie solls auch anders sein kommt dauernd eine Fehlermeldung :)
CODE:
rowbeforeinteger = 2
Dim text As String
text = "=IF(" & epsoldcolumn & rowbeforeinteger & "=""x"";1;0)+IF(" & emailsoldco...
25.08.2008 11:08:33
Thread-ID: 1004403
6 Beiträge
Zelleninhalt mit VBA suchen
Tom

Hallo
zum Feierabend noch mal fix ne Frage
ich möchte in einem anderen sheet, in einer anderen Tabelle etwas suchen und danach 4 Zellen nach links gehen und den Wert kopieren...
Dim strActiveCell As String
Dim rFound As Range
Tabellenname = ActiveSheet.Name
Tabellenname...
04.09.2008 16:41:17
Thread-ID: 1007457
4 Beiträge
Anzeige
VBA heutiges Datum finden und Inhalt der Zelle prü
NeptunesChild

Hallo Leutz,
ich möchte in einer Zeiterfassung auf einem Monatsblatt das heutige Datum finden, dann in einer anderen Spalte (5 weiter links) eine Uhrzeit eintragen. Zuvor soll aber die Kontrolle erfolgen, ob in der Zelle bereits etwas steht und ob dies kleiner ist, als die aktuelle Zeit. We...
06.11.2008 15:38:08
Thread-ID: 1022323
3 Beiträge
in farblich markierte Zelle springen
Maja

Hallo,
ich möchte in einem Excelblatt innerhalb eines bestimmten Zellbereichs diejenigen Zellen farblich anders markieren, die den Wert 0 aufweisen, die Namen dieser Zellen in einer MsgBox ausweisen und bei Klicken auf "OK" der MsgBox zur ersten der ausgegebenen markierten Zeile springen.
13.11.2008 15:11:05
Thread-ID: 1024246
6 Beiträge
Leere Zelle suchen, Wert eintragen VBA
andreas

Hallo zusammen,
habe ein kleines Formular mit zwei "Command-Button".
Bei drücken von "Zufügen" soll die nächst leere Zelle im Bereich "F3:J3500" gesucht werden und ein "x" eingetragen werden.
Bei drücken von "Entfernen" suche im selben Bereich die letzte ausgefüllte Zelle und diese...
19.11.2008 11:57:07
Thread-ID: 1025960
2 Beiträge
Per Makro zu einer bestimmten Zelle springen
Joachim

HI,
dank Eurer Hilfe weiss ich nun, wie ich meine Spalte prüfen kann:
For Each c In .Range("BD10:BD100")
If Not IsDate(c) And Not IsEmpty(c) Then
UserForm1.TextBox1 = "Cell " & c.Address & " is not a date !"
Exit Sub
End If
Next
Wenn es die Möglichkeit gi...
25.11.2008 08:16:21
Thread-ID: 1027553
5 Beiträge
makro Zeile nach unten verschieben
donald

Hallo,
ich hätte gern ein Makro für folgendes Problem: Ich habe eine tabelle, und wenn ich in eine Spalte, hier H, "Absage" eintrage, soll mir Excel die ganze Zeile nach unten verschieben, z.B. in Zeile 50. Bei einem anderen Wort, "Auftrag", soll mir die ganze Zeile auch verschoben werden,...
02.12.2008 16:08:24
Thread-ID: 1029545
5 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
16
4
5
3
2
2
5
1
4
4
4
2
2
2
4
5
2
2
4
2
4
2
3
7
2