Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1640to1644
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
1640to1644
1640to1644
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilencode per VBA kopieren

Zeilencode per VBA kopieren
05.09.2018 10:05:38
Denis
Hallo zusammen,
ich habe folgendes Problem.
Ich möchte mit VBA-Code einen "Excelbefehl" eintragen lassen.
Der Excelbefehl steht u.a. aus berechneten Variabeln
NewName ist ein Wert, der die Datenherkunft festlegen soll.
Der Wert in der Excelspalte soll fongender sein:
=WENN(ISTLEER(Federhängerliste!MXX;" ";Federhängerliste!MXX)
M=Spalte XX=Berechnete Zeile
So sieht mein VBA-Code bisher aus: 

'With Range("N48")
'.Formula = "=WENN(ISTLEER(Federhängerliste!M" & NewName + 10 & ");" & " ;Federhängerliste! _
M" & NewName + 10 & ")"
'End With

Der VBA-Code Teil funktioniert: 

"=Federhängerliste!M" & NewName + 10

Vielen Dank für die Hilfe!
Liebe Grüsse
Denis

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

Betreff
Datum
Anwender
Anzeige
AW: dt oder eng
05.09.2018 10:09:51
Fennek
Hallo,
unterscheide bitte zwischen
.Formula : dann immer die englichen Befehle
.FormulaLocal : dann die deutschen Befehle.
mfg
AW: dt oder eng
05.09.2018 10:35:57
Daniel
außerdem:
.Formula: englische Befehle, Komma als Parametertrennzeichen, Punkt als Dezimalzeichen
.FormulaLocal: deutsche Befehle, Semikolon als Parametertrennzeichen, Komma als Dezimalzeichen
weiterhin würde ich das so machen, weils übersichtlicher ist und man die Fehler in der Formel schneller erkennt
dim Fo as string
FO = "=WENN(ISTLEER(Federhängerliste!MXX);"" "";Federhängerliste!MXX)"
FO = Replace(FO, "XX", NewName + 10)
Range("N48").FormulaLocal = FO
Gruß Daniel
Anzeige
AW: Zeilencode per VBA kopieren
05.09.2018 10:11:08
Werner
Hallo Denis,
Gänsefüßchen innerhalb der Formel müssen gedoppelt werden 
"=WENN(ISTLEER(Federhängerliste!M" & NewName + 10 & ";"""";Federhängerliste!M" & NewName + 10 & ")"
Gruß Werner
AW: Zeilencode per VBA kopieren
05.09.2018 10:59:16
Gerd
Moin,
FormulaLocal, "" statt " und Klammerung beachten.
Range("N48").FormulaLocal = _
"=WENN(ISTLEER(Federhängerliste!M" & Newname + 10 & ");"" "";Federhängerliste!M" & Newname + 10 & ")"
Gruß Gerd

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige