Microsoft Excel

Herbers Excel/VBA-Archiv

Tabellenblattname mehr als 31 Zeichen | Herbers Excel-Forum


Betrifft: Tabellenblattname mehr als 31 Zeichen von: Roger
Geschrieben am: 21.02.2012 11:52:44

Guten Tag,

Ich vergebe einen Blattnamen bestehend aus zwei Zellen.

ActiveSheet.Name = Range("h2").Value & " " & Range("c2").Value

Leider kann es vorkommen, dass es zusammen mehr als 31 Zeichen gibt und nicht korrekt funktioniert.

Wie kann ich diesen Namen auf 31 Zeichen kürzen.

Bitte um Hilfe. Danke Roger

  

Betrifft: AW: Tabellenblattname mehr als 31 Zeichen von: Josef Ehrensberger
Geschrieben am: 21.02.2012 11:57:16


Hallo Roger,
ActiveSheet.Name = Left(Range("h2").Value & " " & Range("c2").Value, 31)



« Gruß Sepp »



  

Betrifft: AW: Tabellenblattname mehr als 31 Zeichen von: ing.grohn
Geschrieben am: 21.02.2012 11:57:59

Hallo Roger,
versuch mal:

DatName=Range("h2").Value & " " & Range("c2").Value
If Len(DatName)>31 Then
   DatName=Left(Datname,31)
End If
ActiveSheet.Name =  DatName

Mit freundlichen Grüßen
ALbrecht


  

Betrifft: AW: Tabellenblattname mehr als 31 Zeichen von: Roger
Geschrieben am: 21.02.2012 12:03:50

Super, Besten Dank funktionieren beide einwandfrei.
Gruss roger


Beiträge aus den Excel-Beispielen zum Thema "Tabellenblattname mehr als 31 Zeichen"