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

Anahl Zeichen

Anahl Zeichen
07.07.2002 19:12:26
Robert
Hi Leute,
ich möchte folgende Ausgabe in Zelle A1 haben:
einen Text und die Funkion LÄNGE von jeder Zelle ab A2 - Ax
z.B.: "Hallo 17" in A1
wobei 17 die Anahl der Zeichen in A2 wären usw
besten Dank schon mal im vorraus

Robert

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

Betreff
Datum
Anwender
Anzeige
Re: Anahl Zeichen
07.07.2002 19:17:08
Hajo_Zi
Hallo Robert

wenn ich es richtig verstanden habe
="Hallo " & LÄNGE(A2)

Gruß Hajo

Re: Anahl Zeichen
07.07.2002 19:24:42
Berai
Hallo Robert,

ich hatte schon gestern versucht dir beim gleichen Problem zu helfen.
Aber mit dieser Fragestellung wird dir wahrscheinlich auch heute keiner helfen können.
Versuch doch mal anhand einer eingefügten Tabelle zu verdeutlichen was du genau willst.
Ich jedenfalls kein deine Frage nicht begreifen.

Gruß
Rainer

Re: Anahl Zeichen
07.07.2002 19:26:26
Robert
Hallo Hajo,
erstmal Danke das klappt, aber wie geht es für alle darunterliegenden Zellen

Robert

Re: Anahl Zeichen
07.07.2002 19:30:30
Robert
Hallo Rainer,
habs gesehen vielen Dank.
In den Zellen A2 - Ax stehen Datensätze.
Wenn ich eine Zelle z.B.: A2 oder A3 oder A4 anwähle, sollen die
Anzahl der Zeichen in A1 gezählt werden.
Ich glaube jetzt is es besser, sorry für die blöde fomulierung.

Robert

Anzeige
Re: Anahl Zeichen
07.07.2002 20:10:43
Berai
Hallo Robert,

kopiere diesen Code ins Codefenster des betreffenden Tabellenblattes.
Ein Doppelclick auf eine Zelle der Spalte A zeigt dir dann in A1 die Textlänge der angeklickten Zelle.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
If ActiveCell.Column <> 1 Then Exit Sub
Cells(1, 1).Value = Len(ActiveCell.Text)
End Sub

Gruß
Rainer

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige