2009, 13:04
# 3
MOF Koryphäe
Registrierung: 24. 01. 2006
Hallo Michael,
geht es Dir nicht schnell genug? -->
Möglicherweise ist Deine Anfrage zu ungenau formuliert. Gruß
Edgar
Ich weiß, daß ich nichts weiß! 20. 2009, 13:05
# 4
Registrierung: 13. 11. Excel 2007 - Wert in andere Zelle schreiben (ohne VBA) - MS-Office-Forum. 2006
(520, cells(, 1)(xlup))
Hey,
Das kannst Du so lösen:
Cells((520, cells(, 1)(xlup)), 1)=xy
Der Wert der Variablen xy wird in die nächste freie Zeile der Spalte A eingetragen wobei die Zeilen 1:520 nicht berücksichtigt werden. Falls es nicht Spalte A, sondern z. B. Spalte E sein sollte, dann musst Du die Funktion an 2 Stellen anpassen:
Cells((520, cells(, 5)(xlup)), 5)=xy
Gruß, NoNet
Excel Vba Wert In Zelle Schreiben 2017
$M$2:$M$20000)*(Ausschuss! $O$2:$O$20000=$A58)*(Ausschu ss! $J$2:$J$20000=B$52)*(MONAT(Ausschuss! $Y$2:$Y$20000)=MONAT($A$51))*(JAHR(Aussc huss! $Y$2:$Y$20000)=JAHR($A$51)))
Beispiel3 {=SUMME((WENN(Ausschuss! $D$2:$D$20000<>"";1/ZÄHLENWENN(Ausschuss! $D$2:$D$20000;Ausschuss! $D$2:$D$20000)))*(Ausschuss! $J$2:$J $20000=B$52)*(MONAT(Ausschuss! $Y$2:$Y$20000)=MONAT($A$51))*(JAHR(Ausschuss! $Y$2: $Y$20000)=JAHR($A$51)))}
Diese kann ich alle problemlos per Makrorecorder in VBA-Code überführen; beim erneuten reinschreiben der Formeln wird auch alles korrekt ausgeführt. Excel vba wert in zelle schreiben 1. Wie du siehst sind nich alle Zellbezüge fixiert, dh ich will die Formel "rüber- bzw. runterziehen"; das Formelnziehen habe ich in VBA bisher immer mit einer Forschleife gelöst. also z. B.
Sub Beispiel1
for i=1 to 8
Cells(i, 82). formular1c1 = "=r80c" & i+1 & "/r81c" & i+1
next
end sub
Ich will aber nicht die Formel sondern nur den einmalig damit errechneten Wert in meine Zellen einfügen. Wie die Formeln aussehen habe ich jetzt glaube ich geschildert; und Mein Problem ist dass ich einmal per Knopfdruck die Berechnung anstoßen will (=Makrobutton), und dann sollen alle Formeln entsprechend der obigen Beispiele gerechnet werden, damit die Tabelle aber übersichtlich und für weitere Verwendung handhabbar bleibt, dürfen in den Zellen keine Formeln sondern nur Werte stehen.
Excel Vba Wert In Zelle Schreiben E
2011, 09:42
# 3
Registrierung: 10. 07. 2007
Karma:
Hallo Aragorn25,
oder so? If Artikelnummer Then
If IsEmpty() Then
ElseIf MsgBox("Ein Wert ist schon vorhanden. Überschreiben? ", vbYesNo) = vbYes Then
Grüße
EarlFred
__________________
Für 14 meiner Beiträge haben sich Hilfesuchende mit einer Spende an Wikipedia oder die Tafeln (oder andere Hilfsorganisationen) bedankt - eine tolle Geste! (das entspricht 0, 0855% oder 1 Spende pro 1. 170 Beiträge per 31. 08. Excel2007 - VBA Wert mit einer Formel berechnen und in Zelle schreiben - MS-Office-Forum. 2021)
Als Dankeschön der Ukraine helfen
10. 2011, 09:51
# 4
Hallo EarlFred
mich hat nur das stutzig gemacht:
Zitat:
mit was fuer einem Code weitermachen? daher mit Sprungmarke
10. 2011, 10:00
# 5
Hallo hary,
ja, bin ich auch drüber gestolpert. Habe mal ins Blaue rein geraten. Er wird das schon irgendwie verwenden können, sonst wird er sicher nachfragen...
10. 2011, 10:21
# 6
Aragorn22
Besten Dank. Noch besser wäre es, wenn ich ohne einen Wert einzugeben, Ok drücken könnte und der Wert in der Zelle bleibt. Weiss nicht, ob das kompatibel ist mit Type:=1
Gruss
10.
Excel Vba Wert In Zelle Schreiben Deutsch
2009, 13:09
# 5
@jinx: Optimierungsbedarf? Hey jinx,
ich tu das nur sehr ungerne, aber hier "optimiere" ich mal Deinen Vorschlag:
Cells(, "A")(xlUp)(1) = "Dein neuer Wert"
Weshalb erst eine Objekteigenschaft auslesen, um mit dieser dann wieder fast das gleiche Objekt zu referenzieren;-)? PS: Klappt natürlich nicht bei gefilterten Listen - Daher auch mein Beitrag oben!! 20. 2009, 13:13
# 6
Threadstarter
geht leider nicht....
weil der bereich bis zeile 520 gefiltert wird und die letzten einträge in diesem bereich momentan noch leer sind...
lg michael
10. 2012, 10:21
# 7
Popsi
Zellinhalte Kopieren
Also ich werde aus den ganzen Informationen nicht schlau! Excel vba wert in zelle schreiben 2019. Ich weiß das Thema gibt es überall und ich entschuldige mich direkt dafür, aber
Ich habe 2 Sheets, das 2. Sheet entpricht einer Tabelle in der folgende dinge in die nächste Freie Zeile kopiert werden sollen:
Datum, Zahl, und ein fest definierter Text "xy"
Dabei steht die Zahl in Sheet 1 und in Cell(2, 4)
Bekomme das irgendwie nicht hin! 10.
Excel Vba Wert In Zelle Schreiben In Deutsch
20. 05. 2009, 12:41
# 1
MOF User
Registrierung: 05. 06. 2008
Karma:
VBA - in nächste freie zeile schreiben
hallo excel freaks,
wie kann ich in die nächste freie zeile einen wert einttagen der in der variable xy steht? die zeilen 1-520 sind schon reserviert ein bereich der gefiltert wird. das heist die werte müssen in 521, 522, 523.... Collatz Reihe in Excel mithile von VBA. eingetragen werden
vielen dank mal vorab! Michael
20. 2009, 12:57
# 2
MOF Guru
Registrierung: 28. 02. 2001
Moin, Michael,
Code:
Cells(Cells(, "A")(xlUp) + 1, "A") = "Dein neuer Wert"
__________________
cu
jinx
per 31. 12.
Excel Vba Wert In Zelle Schreiben 2019
=ZÄHLENWENNS(F2:F1934;"=0")+ZÄHLENWENNS(F2:F1934;"=1") Range("A1") = untifs(Worksheets("Tab1")("F2:F1934"), "=0")untifs(Worksheets("Tab1")("F2:F1934"), "=1") Vorteil. Excel muss nicht Immer wieder dieses Ergebnis rechnen=>Zeitersparnis. Wenn die ähnliche Formel 1000 fach in dein Sheet schreibst wird es sehr langsam. Hast Du Dir den String mal ausgeben lassen? Z. B. mit ins Direktfenster? Die Formel musst Du der Eigenschaft Cells(neu. 2). Excel vba wert in zelle schreiben 2017. Formula zuweisen. Ich habe mal die Erfahrung gemacht, dass man zum Einfügen der Formel die englischen Bezeichnungen der Tabellenfunktionen verwenden muss. Es gibt zwar FormulaLocal, aber dass hat damals nicht ordentlich funktioniert. Viel Erfolg
Hannes
Wenn ich deine Frage richtig verstanden habe, schreibst du in Makro deutsche Formel? Versuchs mal, die englische "Variante". Nötigenfalls benutze die Makroaufzeichnung und adaptiere dann entsprechend
Hallo Oubyi,
Super! Ich habe mich krampfhaft an die Hochkommata gehalten, da diese mir aus einem anderen Beispiel mit ZÄHLENWENNS vorgegeben wurden.
Über alle Formeln laufe ich mit 2For-Schleifen für Zeile(i) und Spalte(j), daher fällt mir die varialbe Spaltenangabe bei A1-Schreibweise schwer. Bin auf euere Vorschläge schon sehr gespannt. Gruß euer Neuling
25. 2013, 16:55
# 2
MOF Meister
Registrierung: 21. 10. 2008
Hallo Neuling,
Mein immer wieder gerne gegebener Tipp: Das Hochladen einer Beispieldatei, gerne auch mit reduzierten und anonymisierten Daten, in der das Problem und das gewünschte Ergebnis dargestellt werden, erhöht die Aussicht auf eine hilfreiche Antwort ungemein. __________________
Gruß Hasso
Programmers don't die, they just GOSUB without RETURN
System Windows 10 Home 64 Bit, Office 2016
Wenn dir mein Beitrag gefallen hat, kannst du ihn bewerten (mit dem Symbol links unten)
25. 2013, 17:21
# 3
Mit einer Beispieldatei kann ich im Moment nicht dienen. Ich kann aktuell nur versuchen das Problem genauer zu beschreiben:
also ich habe viele verschieden komplexe Formeln und Arrayformeln:
Beispiel1 =B$80/B$81
Beispiel2 =SUMMENPRODUKT((Ausschuss!