Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
156to160
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
156to160
156to160
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellbezug, aber wie?

Zellbezug, aber wie?
09.09.2002 10:44:24
Ingo
Hallo,
will in eine Textbox per makro den Zellinhalt einfügen lassen.
Hier die Betreffende Codezeile:

Selection.Characters.Text = (P52) & Chr(10) & Cells(53, 16) & Chr(10) & "990650"

Also nur die Zelle (P52) geht net und mit Cells klappts auch net. Den Wert direkt eingeben "99.." funktioniert, aber des will ich ja net ;-)

Kann mir jemand verraten, wie ich auf die Zelle verweisen muß?

Danke,
Ingo

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zellbezug, aber wie?
09.09.2002 10:47:39
L.Vira
Selection.Characters.Text = [P52] & Chr(10) & Cells(53, 16) & Chr(10) & "990650"


Typen unverträglich
09.09.2002 10:54:39
Ingo
habs mal mit den [ ] getestet, aber dann kommt typen unverträglich... ;-(

Selection.Characters.Text = [P52] & Chr(10) & [P53] & Chr(10) & [P54]

Re: Typen unverträglich
09.09.2002 10:56:34
L.Vira
Selection.Characters.Text = Range("P52") & Chr(10) & [P53] & Chr(10) & [P54]
ah, mit Range! Danke! (o.T.)
09.09.2002 10:59:30
Ingo

Re: Typen unverträglich
09.09.2002 11:01:31
L.Vira
Die anderen Range natürlich auch:
Option Explicit
Sub test()
ActiveSheet.Shapes("Text Box 1").Select
Selection.Characters.Text = Range("A1") & Chr(10) & Range("b1") & Chr(10) & Range("c1")
End Sub
Re: Typen unverträglich
09.09.2002 11:03:25
Ingo
jo, klar. schon umgebaut.
Danke.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige