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
988to992
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
988to992
988to992
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro für Zelle nach untern kopieren?

Makro für Zelle nach untern kopieren?
03.07.2008 20:19:33
M-G
Hallo zusammen,
wieder mal hätte ich eine Frage an die Experten.
Ich möchte ein Makro erstellen, kann dies aber nicht selber.
Daher habe ich mal mein Problem mit genauer Beschreibung hochgeladen
https://www.herber.de/bbs/user/53573.xls
Ich möchte ein kurzes Makro, welches den Inhalt von B1 runterkopiert, bis die nächste Zahl in Spalte B kommt. Dann soll er diese Zahl nehmen und wiederum runterkopieren, bis erneut die nächste Zahl kommt. In den Folgezellen sind Wörter, Zeichen, Leere Zellen und schließlich Zahlen.
Am Besten mal kurz in die Datei reinschauen, ich habe es dort nochmals genau erklärt.
Dürfte recht einfach sein.
Vielen Dank schon mal!
Grüße und schöne Restwoche noch.

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: wozu ein Makro?
03.07.2008 20:39:00
Chris
Servus,
diese Formel in D2 und runter kopieren:
=WENN(ISTZAHL(B1);B1;D1)
und in D1 :
= B1
Gruß
Chris

AW: Sorry, kleiner Zeilendreher...
03.07.2008 20:42:34
Chris
Servus,
so passt es:
=WENN(ISTZAHL(B2);B2;D1)
der Rest bleibt gleich.
Gruß
Chris

AW: Sorry, kleiner Zeilendreher...
03.07.2008 20:46:00
M-G
Eigentlich brauch ich das Makro, weil ich die Spalten A, C-J nicht verändern will und das ganze nur eine "Vorveränderung" Allerdings könnte ich ja eine Hilfsspalte einfügen mit der Formel und dann anschließend die ursprüngliche Spalte löschen... denke das müsste funktionieren.
Werde es aber erst morgen versuchen können und morgen abend berichten.
DAnke und Gruß

Anzeige
AW: Dann aber,...
03.07.2008 21:02:00
Chris
... die Formeln in Werte umwandeln, oder als Makro über Hilfsspalte:

Sub mg()
lngletzte = IIf(IsEmpty(Cells(Rows.Count, 2)), Cells(Rows.Count, 2).End(xlUp).Row, Rows.Count)
Columns(2).Insert
Range("B1").FormulaR1C1 = "=RC[1]"
Range("B2:B" & lngletzte).FormulaR1C1 = "=IF(ISNUMBER(RC[1]),RC[1],R[-1]C)"
With Range("B1:B" & lngletzte)
.Formula = .Value
End With
Columns(3).Delete
End Sub


Gruß
chris

302 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
makro markierung von Zeilen nach oben und unten
Zeilen

Hallo liebe Excel-Gemeinde,
ich weiss dass es schon viele Beiträge zum Thema "Löschen von Zeilen nach einer Bedingung" gibt, aber ich habe nach langer Suche keine Lösung bzw. Ansatzpunkt gefunden.
Problembeschreibung:
Ich brauche ein Makro, dass in der Spalte 2 nach 2 verschiedenen...
12.09.2008 08:37:02
Thread-ID: 1009273
3 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
Formel nach unten...
werner

Hallo zusammen,
wenni ch in Zelle D10 z.B. die Formeln = B10+C10 kann ich diese nach unten in Zelle D11,D12.......ziehen um die Formel zu übernehmen.
Meine Frage ist folgende , geht das auch mit = Tabelle1!C9 ,wenn ich da nach unten ziehe solte sich die Formel auch anpassen d.h Tabelle2...
12.01.2009 20:24:00
Thread-ID: 1039009
4 Beiträge
Formel automatisch nach unten ziehen
Hartwig

Hallo Leute,
Ich habe eine Frage.
In A1 steht ein Wert, in B1 eine Formel.
Gibt es eine Möglichkeit dass sich die Formel von B1 in die
angrenzenden unteren Zellen (B2, B3 usw.) erweitert, wenn die Zellen
A2, A3 usw. mit Werten gefüllt werden?
Danke schon mal für eure Hil...
27.01.2009 11:03:00
Thread-ID: 1044121
7 Beiträge
SVERWEIS springt ungewollt Zeile nach unten
Christoph

Hallo Zusammen,
ich hänge an einem ganz seltsamen Problem und komme nicht dahinter woran es liegen könnte.
Benutze folgenden S-Verweis:
=WENN(SVERWEIS(E22;'Gebühren-Stammdaten_Berech.'!$D$11:$AH$47;31;FALSCH)=0;"";SVERWEIS(E22; 'Gebühren-Stammdaten_Berech.'!$D$11:$AH$47;31;FALSCH))...
07.02.2009 18:17:24
Thread-ID: 1048114
3 Beiträge
Spalten ausblenden von - bis
-

Hallo an alle Cracks,
habe eine Beispieldatei angehängt. Ich würde gerne in den Zellen B1 und B2 als Eingabe für die Kalenderwochen definieren. z.B. ich gebe von KW 10 bis KW 15 anschließend werden alle Spalten ausgeblendet nur die sollen angezeigt werden in dem Interval von 10 - 15. Könnt...
20.02.2009 11:23:00
Thread-ID: 1052397
6 Beiträge
Leerzeile zählen-nach unten
robert

hi,
kann man-siehe datei- leere zeilen nach unten zählen?
z.B. A6 bis A10 ist leer-sind 5 leerzeilen
in B5 soll 5 stehen
gruß
robert
https://www.herber.de/bbs/user/60378.xls
17.03.2009 09:26:21
Thread-ID: 1061001
3 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
2
4
4
3
6
2
5
2
3
3
4
18
1
4
2
1
4
5
3
5
2
5
2