Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
712to716
712to716
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

formel schreiben bis letzte zelle

Forumthread: formel schreiben bis letzte zelle

formel schreiben bis letzte zelle
03.01.2006 12:35:14
bongiu
Hallo freunde,
ich habe noch eine Frage:
mit den Makrorekorder habe ich der Code aufgezeichnet:
Range("AR3").Select
ActiveCell.FormulaR1C1 = _
"=TEXT(RC[-1],) &"" ""&TEXT(RC[-42],)&"" ""&TEXT(RC[-23],)"
Selection.AutoFill Destination:=Range("AR3:AR2506"), Type:=xlFillDefault
was soll ich ändern, damit die Formel nicht bis AR2506 geschrieben wird, sondern nur bis zu letze nicht letzte leere Zelle (End(xlDown).Row)?
Danke Bongiu
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: formel schreiben bis letzte zelle
03.01.2006 12:47:49
Beverly
Hi,
hiermit bestimmst du die letzte benutzte Zeile in Spalte A
    Dim loLetzte As Long
With Worksheets("Tabelle1")
If IsEmpty(Cells(65536, 1)) Then
loLetzte = .Cells(Rows.Count, 1).End(xlUp).Row
End If
End With

Gib dann als Ziel Range(Cells(3, 44), Cells(Loletzte + 1, 44)) an.
Bis später,
Karin
Anzeige
AW: formel schreiben bis letzte zelle
03.01.2006 13:49:14
bongiu
Hallo Karin,
danke für deine Antwort.
GEKLAPPT
Nochmal Vielen Danke

Forumthreads zu verwandten Themen

VBA - Summe unter letzter Zeile bilden
mgr

hallihallo!
ich hab jetzt schon ziemlich lang rumgesucht, komm aber leider nicht zum durchbruch. dabei - so unterstelle ich - hab ich ein problem, das schon viele gehabt haben müssten und das wahrscheinlich auch nicht unlösbar ist.
ich habe eine tabelle mit einer variablen anzahl von ze...
07.11.2008 13:39:07
Thread-ID: 1022657
3 Beiträge
Formel für letzter Zeilenwert
Andre´

Hallo alle zusammen,
gibt es eine Formel, die mir den letzten Zeilenwert anzeigt.
Tabelle1

 BCDEFGHIJKLMN3 = letzter Zeilenwert() AnnePeter12.01.2008       Ändern4 = letzter Zeilenwert() FranzPetraLutz15.05.2008   ...
05.12.2008 07:44:00
Thread-ID: 1030336
8 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
Spalte bis zur letzten Zeile mit akt. Datum füllen
Stefan

Hallo,
ich habe eine Tabelle mit mehreren gefüllten Spalten (z.B. A, C, E, F) und leeren Spalten dazwischen.
Nun möchte ich Spalte I mit dem aktuellen Datum füllen, und zwar bis zur letzten gefüllten Zeile einer Spalte mit Inhalt.
Wie gehe ich da am besten vor?
Die gefüllten Spa...
03.03.2009 13:35:30
Thread-ID: 1055961
4 Beiträge
Anzeige
Formel eintragen bis letzer Wert in anderer Spalte
Jonathan

Hallo zusammen,
ich habe mal wieder eine Frage an euch.
In Spalte E wird in E4 via VBA eine Formel eingetragen. Diese soll nun nun nach unten kopiert werden. Ende sollte der letzte Wert der Spalte F sein.
Wie kann ich das am schnellsten via Makro realisieren? Oder darf ich die Forme...
17.03.2009 17:39:15
Thread-ID: 1061170
4 Beiträge
FOrmeln einfügen bis zur letzten Zelle
Tobias

Hallo zusammen,
derzeit füge ich folgende Formeln mit einem Makro ein:
Private Sub Formeln_einfügen2() Range("j2").Select ActiveCell.FormulaR1C1 = "=IF(RC[-2]>0,IF(RC[-2]-RC[-3]>=75,""ja"",""nein""),"""")" Range("j2").Select Selection.AutoFill Destination:=Range("j2:j20000"), Ty...
01.05.2009 16:36:03
Thread-ID: 1072338
3 Beiträge
Anzeige
Makro: Wort ersetzen bis letzte Zeile von...
Julia

Hallo,
ich habe ein Makro geschrieben welches mir in der Spalte I das Wort "Fixed" durch "Behoben" ersetzt.
Funktioniert auch wunderbar.
Sub fixed_behoben() Sheets("Datenbasis").Select ActiveWindow.SmallScroll ToRight:=-3 Columns("I:I").Select Selection.Replace What:="Fixed", Repl...
30.06.2009 11:17:32
Thread-ID: 1085300
3 Beiträge
Formel kopieren mit VBA bis leere Zeile
jo_cindy

HAllo, habe noch keine Formel im Archiv gefunden, die bei mir funktioniert.
Ich möchte in Spalte X ab Zeile 2 die folgende Formel einsetzen: Selection.NumberFormat = "h:mm"
ActiveCell.FormulaR1C1 = "=RC[-8]/24" Diese Formel soll dann in Spalte X solange kopiert werden, bis in Spalte A...
27.10.2009 11:02:17
Thread-ID: 1112437
6 Beiträge
Formel auf anderes Blatt mit fortlaufender Spalte
Fred

Man das hört sich wieder mal schlimm an, oder ?
Ich möchte eine Formel aus Zelle A1-Blatt1 in Zelle A1-Blatt2 kopieren.
In A1-Blatt1 steht die Formel: ='Meine Daten'!C13-'Meine Daten'!C13-'Meine Daten'!C13
Nun soll diese Formel in Zelle A1-Blatt2 so kopiert werden dass die Spalte u...
18.12.2009 12:21:34
Thread-ID: 1124855
6 Beiträge
Anzeige
in sverweis bis zur letzten Zeile durchsuchen
Stein

Hallo,
ich habe ein kleines Problem:
In einer Tabelle für Auftragsverläufe ist in einer Formel unter anderem auch eine Sverweis- _ Funktion enthalten, in der in der Spalte A das maximale Datum ermittelt und in der entsprechenden Spalte derselben Zeile nachgeprüft werden soll, ob dort ei...
15.09.2010 09:52:41
Thread-ID: 1177651
14 Beiträge
Formel bis Ende
gerhard

Hallo bitte um Makro Hilfe,
wie kann ich ab der aktiven Zellposition die Spalte bis zum Ende der links davon
liegenden Spalte mit einer Formel auffüllen?
Ich möchte die Berechnung starten ab der aktiven Zellpositon z.B C10
In der links liegende B Spallte sind Werte bis z.B B2000...
24.03.2011 14:24:07
Thread-ID: 1207409
4 Beiträge
Formeln nach unten kopieren bis anzugebender Zeile
Stefan

Hallo.Ich habe folgendes ProblemIch möchte von VBA in einem Sheet eine Formel nach unten kopieren lassen.
Bislang sieht das bei mir so aus: Range("G1:G1").Select
ActiveCell.FormulaR1C1 = "=IF(RC[-2]="""","""",C[-1]/C[-2])"
Selection.AutoFill Destination:=Range("G1:G...
13.05.2002 16:02:06
Thread-ID: 120530
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige