Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Inputbox Verknüpfung

Inputbox Verknüpfung
18.08.2008 15:50:09
Kurt
Hallo,
folgende Inputbox zeigt die 10 in der Eingabezelle Richtig an:
Suchtext = InputBox("Name des neuen Blattes", "Eingabe", "10_")
Ich möchte anstelle der eine Verknüpfung zu einer Sheet:
"ActiveSheet("Zahlen").Range("C4").Value"
leider klappt es nicht,
Warum?
gr Kurt P

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
nur ActiveSheet.Range("C4").Value oT
18.08.2008 16:10:00
Matthias

Danke, Matthias -)
18.08.2008 16:24:36
Kurt

AW: geschlossen
18.08.2008 16:25:00
zu

Anzeige
Habe irgendwie was Falsch...
18.08.2008 16:41:00
Kurt
Hallo Matthias,
leider klappt es nicht mit meiner Formel zusammen:
Range("E3").FormulaLocal = "=SUMMENPRODUKT((MONAT(L6:L64487)=" _
& InputBox("Monatseingabe") & ")*(L6:L64487""""))"
Wenn ich eine Zahl in der Inputbox eingebe klappt alles, leider kann ich nicht
die Verbindung zur Sheet herstellen um die entsprechende Zahl einzugeben:
Format(Sheets("Zahlen").Range("C4").Value, "M"))
Bitte nochmal schauen, danke im voraus,
gruß Kurt P

Anzeige
So jetzt habe ich die Lösung in der Recherche -)
18.08.2008 18:19:00
Kurt
Hallo Matthias,
habe mal in der Recherche gesucht und etwas zusammengestellt:
Dim sPrompt As String, sDefault As String
sPrompt = "Monatseingabe"
sDefault = Format(Format(Sheets("Bericht").Range("C4").Value, "M"))
Range("E3").FormulaLocal = "=SUMMENPRODUKT((MONAT(L6:L64487)=" _
& InputBox(prompt:=sPrompt, Default:=sDefault) & ")*(L6:L64487""""))"
so klappt es,
Dankr trotzdem,
mfg Kurt P
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige