Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Frage / =ANZAHL / wie in VBA schreiben?
#1
hallo an @,

In Spalte GC schreibe ich die Formel =ANZAHL(DW1:FS1)

dann ziehe ich dies runter bis in Spalte DT kein Eintrag
mehr vorhanden ist.

 Nun die Frage - wie schreibe ich das in VBA für Excel 2003 ?


LG
Angelina
Antworten Top
#2
Hallo,

dat is doch schong in mengem Code drin, musste numme lese!
Gruß

Edgar

Meine Antworten sind freiwillig und ohne Gewähr!
Über Rückmeldungen würde ich mich freuen.
Antworten Top
#3
(05.03.2015, 18:07)BoskoBiati schrieb: Hallo,

dat is doch schong in mengem Code drin, musste numme lese!

hallo,

ja ... hm.... wo Huh

In Spalte GC schreibe ich die Formel =ANZAHL(DW1:FS1)

Also in Spalte GC soll angezeigt werden wieviel Zahlen im Bereich DW1:FS1 stehen
dann runterziehen bis in Spalte DT kein Eintrag mehr ist. Nur als VBA

LG
Angelina
Antworten Top
#4
Hallo Angelina,

zeichne Dir das mit dem Makrorecorder auf. Dann hast Du den VBA-Code.
Gruß Stefan
Win 10 / Office 2016
Antworten Top
#5
(05.03.2015, 20:11)Steffl schrieb: Hallo Angelina,

zeichne Dir das mit dem Makrorecorder auf. Dann hast Du den VBA-Code.

hallo Steffl,

danke für deine Rückmeldung.

Ja - aber das ist ja nur ein Teil

Selection.AutoFill Destination:=Range("GC1:GC20"), Type:=xlFillDefault

Dazu muss in GC1 die Formel vorhanden sein
=ANZAHL(DW1:FS1)

Und das ist sie eben am Anfang nicht.

Desweiteren soll es in Abhängigkeit der Spalte DT sein - die gibt an was die letzte Zeile ist.

LG
Angelina
Antworten Top
#6
Hi Angelina,

(05.03.2015, 20:22)Angelina schrieb: Dazu muss in GC1 die Formel vorhanden sein
=ANZAHL(DW1:FS1)

Und das ist sie eben am Anfang nicht.

na, dann schreibe sie halt während des Aufzeichnens am Anfang ganz einfach in die Zelle GC1 rein.

Problem gelöst!
Antworten Top
#7
hallo Rabe,

danke für deine Info



PHP-Code:
   Range("GC1").Select
    ActiveCell
.FormulaR1C1 "=COUNT(RC[-58]:RC[-10])"
 
   Selection.AutoFill Destination:=Range("GC1:GC20"), Type:=xlFillDefault
    Range
("GC1:GC20").Select 

Und die Abhängigkeit zur Spalte DT
die besagt was die letzte Zeile ist ?

Wie baue ich die in die Aufzeichnung ein?

LG
Angelina
Antworten Top
#8
Hallo Angelina,

das Autofill braucht es nicht unbedingt:

Code:
Sub Formel_In_GC()
 With ActiveSheet
   .Range(.Cells(1, 185), .Cells(.Cells(.Rows.Count, 124).End(xlUp).Row, 185)).Formula = "=COUNT(DW1:FS1)"
 End With
End Sub

Gruß Uwe
[-] Folgende(r) 1 Nutzer sagt Danke an Kuwer für diesen Beitrag:
  • Angelina
Antworten Top
#9
hallo Kuwer ,




danke auch dir - das war meine Lösung




LG
Angelina
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste