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

Inputbox

Forumthread: Inputbox

Inputbox
04.09.2008 10:20:38
serge
Hallo Leute
Ich habe noch nie mit InpuBox gearbeitet!
Wie kommt der Inputboxwert in die ActiveCell?
InputBox ("Neuer Name eintragen")
ActiveCell.FormulaR1C1 = ?
Danke
Serge
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Inputbox
04.09.2008 10:27:30
David
einfach so:
wert = InputBox ("Neuer Name eintragen")
ActiveCell.FormulaR1C1 = wert
Gruß
David
AW: Inputbox
04.09.2008 10:28:33
fcs
Hallo Serge,

ActiveCell.Value= InputBox ("Neuer Name eintragen")


Gruß
Franz

AW: Inputbox
04.09.2008 10:28:00
David
oder noch kürzer:
ActiveCell.FormulaR1C1 = InputBox ("Neuer Name eintragen")
das wäre dann einmalig, wenn es nur um die Eintragung geht. Wenn du den Wert noch woanders verwenden willst, ist es besser, ihn gleich in eine Variable einlesen zu lassen, wie im ersten Beispiel beschrieben.
Gruß
David
Anzeige
Danke an alle owT.
04.09.2008 10:33:00
serge
Zusatzfrage zu Einsatz von Vorschlägen
04.09.2008 10:54:54
Vorschlägen
Hallo
ich habe es so eingesetzt:

Sub block1()
wert = InputBox("Neuer Name eintragen")
schutzaus
Application.ScreenUpdating = False
Sheets("JANUAR").Select
Application.Goto Reference:="Block1"
Selection.EntireRow.Insert
ActiveCell.FormulaR1C1 = wert
Sheets("FEBRUAR").Select
Application.Goto Reference:="Block1"
Selection.EntireRow.Insert
ActiveCell.FormulaR1C1 = wert
Sheets("MÄRZ").Select
Application.Goto Reference:="Block1"
Selection.EntireRow.Insert
ActiveCell.FormulaR1C1 = wert
Sheets("JANUAR").Select
schutzein
es kommt eine Fehlermeldung: Fehler bei Kompilieren : Variable nicht definiert
Was fehlt da noch?
Serge
Application.ScreenUpdating = True
End Sub


Anzeige
AW: Zusatzfrage zu Einsatz von Vorschlägen
04.09.2008 10:58:24
Vorschlägen
WAS soll denn mit der Inputbox eingegeben werden?
Du musst die Variable per
Dim wert as ... (z. Bsp. Integer, Byte, String etc.)
definieren.
Dann ist noch die Frage, ist es ein "Wert" oder eine "Formel"? Denn mit ActiveCell.Formula... schreibst du eine Formel in die Zelle, wenn du den Wert dorthin haben möchtest, wäre ActiveCell.Value richtig.
Gruß
David
Anzeige
Haha! Danke es klappt mit String
04.09.2008 11:02:00
serge
Serge
AW: Haha! Danke es klappt mit String
04.09.2008 11:08:14
Hajo_Zi
Hallo Serge,
Excel ist ein vielseitiges Programm und man kann viele Probleme damit lösen. Jede positive Seite hat aber auch negative Aspekte - einer davon ist im Makrorecorder enthalten.
Die Bücher, die es zu Excel VBA gibt, erklären viele Funktionen, aber ich habe bisher nur in einem gelesen, dass der vom Makrorecorder aufgezeichnete Code bereinigt werden sollte.
Der Makrorecorder zeichnet alle Aktionen auf, u. a. auch das Auswählen einer Zelle oder eines eingebetteten Objektes (Bild, Diagramm, Zeichnungsobjekt usw.) dabei wird generell Select und Activate aufgezeichnet. Diese Befehle sind in VBA zu 99,9% nicht notwendig. Sie lassen den Bildschirm flackern und senken die Geschwindigkeit bei der Ausführung des Codes. Man sollte also schon von Beginn an bei der Programmierung darauf achten, solche Befehle zu vermeiden. Meine Erfahrung mit dem Vorsatz: Das mache ich später ist, man schreibt das Programm später meist komplett neu. Also kostest es nicht nur Rechnerzeit sondern auch Deine Zeit und ist Dir Deine Zeit so wenig Wert?
Zum Vergleich mit und ohne Select schau Dir auch mal diese Beispielarbeitsmappe an: mit und ohne select Auf meiner Homepage sind alle meine Beispiele ohne Select. Da kann man sich also einige Lösungsansätze zu diesem Thema ansehen.

Anzeige
Danke!
04.09.2008 11:16:00
serge
kann hilfreich sein!
Serge
;

Beliebteste Forumthreads (12 Monate)

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