Programmieren - alles kontrollieren 4.941 Themen, 20.708 Beiträge

Verfolgung starten Optionen

VB, Excel : Variablen und Feldinhalte aneinader reihen

jdeen / 14 Antworten / Flachansicht Nickles

Hallo zusammen !
Ich möchte den Text aus einer InputBox mit dem Inhalt einer Zelle in
einer neuen Zelle verknüpfen:
Dim Text As string
Text = InputBox ("Text", "Eingabe", "Artikelname")
Range("F2").Select
ActiveCell.FormulaR1C1 = "=RC[-1]& x " & Text ????

HIER HAB ICH MEINE SCWIERIGKEITEN !!!

In "E2" (RC[-1]) steht die Menge, Text ist die Artikelbezeichnung
und dies möchte ich gerne als Zeichenkette in Zelle "F2" einfügen:
Ergebnis-Beispiel : " 5 x Dichtung"
Nachher das Ganze runterkopieren und in Werte wandeln ist kein Problem.

Wer kann mir da helfen?

. . . when the kid next door walking on the moon . . .Wirklich gute Jdeen passen auf einen Bierdeckel
bei Antwort benachrichtigen
In Deiner ActiveCell Formel sind die Anführungsstriche schon falsch. Dim ... peterson
Hallo Peterson, da ich in der Tabelle ca. 20 bis 500 Zeilen habe, muß ich ... jdeen
Versuche mal, die Zelle direkt anzusprechen. Du benutzt den Umweg: Range F2 ... peterson
Hallo Peterson, danke für Deine Tipp s. Das Ansprechen der Zellen ist nicht ... jdeen
Ich kann Dir dabei nicht helfen, weil ich mir das nicht richtig vorstellen ... peterson
Hallo Peterson, wenn ich eine Datei mit 65000 Datenzeilen habe, sollen auch ... jdeen
peterson jdeen „Hallo Peterson, wenn ich eine Datei mit 65000 Datenzeilen habe, sollen auch alle...“
Optionen

Sicherlich geht das.
Aber was Du da machst, ist nicht das Verknüpfen einer Variablen mit einem Zelleninhalt, sondern das Verknüpfen einer Variablen mit der Adresse einer Zelle.

Um den Inhalt einer Zelle zu bekommen, mußt Du die Zelle auslesen.
In meinem Beispiel habe ich Dir doch gezeigt, wie ich mit einem Makro in ein Zelle einen Adressbereich eingefügt habe und eine Formel eingetragen habe.

Mach das so:

Dim Text As String
Text = InputBox("Text", "Eingabe", "Artikelname")
Cells(2, 6) = Cells(2, 5) & " x " & Text

Mußt Du halt mit einer Schleife arbeiten.

bei Antwort benachrichtigen
OK. Hab s kapiert. Lieber wäre es mir, die Formel als Ergebnis zu erhalten. ... jdeen
Ich habe mal ein wenig rumgespielt. ActiveCell.FormulaR1C1 RC -1 x Artikel peterson
Guten Morgen, hab ich auch schon probiert. Bringt mir den Variablen-Namen, ... jdeen
Das Problem liegt darin, daß der Befehl eine Formel in eine Zelle schreibt. ... peterson
Genau so hab ich nun das Ganze umgangen. Wenn die Menge etc. OK ist, in ... jdeen
manche Druckprogramme lieben keine Formeln peterson
Hallo Peterson, melde mich nochmal zum Thema Drucken: Wenn ich ... jdeen