Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 12:28:32
Formelfehler aufgrund Einfügen einer Zeile
18.04.2024 11:51:04
Aus Listbox Spalte als Wert zurück bekommen
18.04.2024 11:36:51
Beim Öffnen je nach Datum zu bestimmter Zelle springen
18.04.2024 11:16:38
Pfade werden mit Anführungszeichen "" versehen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1308to1312
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1308to1312
1308to1312
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA - Text kürzen

VBA - Text kürzen
11.04.2013 12:39:12
Claudia
Hallo,
brauche Eure Hilfe!
Ich möchte gerne im VBA-Code den Text auf maximal 60 Zeichen kürzen.
Text = ActiveCell.Offset(0, 6).Value
Text= Len(Text)
Weiter als das komme ich nicht, trotz Suche. Wer kann mir helfen?
Brauche die Lösung aber in VBA.
Vielen Dank!
LG
Claudia

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - Text kürzen
11.04.2013 12:41:16
Klaus
Text = ActiveCell.Offset(0, 6).Value
Text = vba.left(text,60)
msgbox text
Grüße,
Klaus M.vdT.

text=left(text,60) owT
11.04.2013 12:41:46
Rudi

Supi, vielen Dank!
11.04.2013 13:18:59
Claudia

Dabei wird der Text aber abrupt abgebrochen, ...
11.04.2013 16:22:48
Luc:-?
…Susi,
da gibt's schon lange Besseres…
Gruß Luc :-?

Jetzt bin ich neugierig, Luc!
12.04.2013 09:53:12
Klaus
Hallo Luc,
wenn ich einen Text auf N Zeichen reduzieren muss, was ist denn dann besser als ihn nach N Zeichen abzubrechen? Vielleicht "[...]" ans ende damit es sanfter aussieht?
Grüße,
Klaus M.vdT.

Ganz einfach wg. der Verwechslungsgefahr ...
12.04.2013 11:14:12
Matthias
Hallo Klaus
Na wenigstens das letzte Wort sollte bis zum Leerzeichen komplett gezeigt werden.
Option Explicit
Sub Fuer_Klaus()
Dim Text$
Text = InputBox("Bitte Text eingeben", "Verwechslungsgefahr", "Klaus hat Lust auf Daniela")
MsgBox Left(Text, 25), vbCritical, ";o)"
End Sub
Gruß Matthias ;-)

Anzeige
Dafür kann ich zB 1 UDF für den Textumbruch ...
14.04.2013 03:17:50
Luc:-?
…nutzen (Ähnliches gibt's wohl auch im Archiv), Klaus,
deren Ergebnis ich anschließend beim 1. eingefügten Zeilenwechselzeichen beende, zB so:
=LINKS(TinLines(A1;60);SUCHEN(ZEICHEN(10);TinLines(A1;60)))
Habe aber noch andere Möglichkeiten… ;-)
Gruß + schöSo, Luc :-?

7 Forumthreads zu ähnlichen Themen

VBA: String nach der letzten Ziffer abschneiden
joerg

Hallo,
bestimmt ganz einfach, wenn man weiss wie's geht: Ich habe eine Reihe von Strings, zB 'abc_0323BAII' - wie kann ich von diesen die letzten Stellen abschneiden, so dass alles bis zur letzten Ziffer übrigbleibt? (Also, manche der Strings haben am Ende auch nur einen oder zwei oder gar...
06.02.2010 10:38:56
Thread-ID: 1136335
12 Beiträge
Anzeige
vba anpassen daten von excel nach word mit textmar
excel

Hallo Forum
ich möchte ein bestehndes VBA anpassen. habe leider keine grosse VBA Ahnung.
ich möchte aus Excel eine ganze zeile A3:M3 nach Word mittels Textmarke abfüllen eine Textmarke habe ich , jetzt wie muss mann das VBA anpassen das es die ander Textmarken erkennt und mitnimmt? ich...
27.01.2014 13:03:28
Thread-ID: 1346849
3 Beiträge
VBA per Tab-Taste von TextBox zu CommandButton
TextBox

Hallo liebe Excel Gemeinde,
ich habe eine TextBox1 in der ich Suchbegriffe eingebe.
Nun möchte ich, wenn ein Suchbegriff eingegeben wurde, dass ich
mit der Tab-Taste den CommandButton1 aktiviere,
und dann mit Enter den starten kann.
Kennt da jemand eine Lösung ?
Gruß
17.02.2019 10:25:04
Thread-ID: 1676110
9 Beiträge
Anzeige
Textfelder gegenseitig berechnen lassen - VBA
Jonas

Hallo zusammen,
ich erstelle gerade ein Rechnungformular und habe dafür eine Userform entwickelt in der ich alle relevanten Daten eingeben kann.
Dabei habe ich allerdings ein Problem:
Ich habe jeweils ein Textfeld für den Netto- und den Bruttobetrag und ein Combi-Feld für die Umsat...
27.08.2019 10:16:55
Thread-ID: 1709655
2 Beiträge
Textkonvertierungsassistent über VBA aufr.?
js

Hallo,
ich habe folgendes Problem:
Ich möchte eine Datei, die in einem CAD-System im Excel-Format exportiert wurde,
in Excel über ein Makro öffnen.
Wenn ich die Datei ganz normal, also ohne Makro, in Excel öffne, wird der sog.
Textkonvertierungsassistent gestartet, da erkannt...
01.01.1970 00:00:00
Thread-ID: 400225
2 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
11
7
2
8
1
1
1