VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Textlänge in einer Spalte auf 40 Zeichen begrenzen

Gruppe

Feature

Bereich

Gültigkeit

Thema

Textlänge in einer Spalte auf 40 Zeichen begrenzen

Problem

Die Textlänge in Spalte A ist über Menü DATEN / GÜLTIGKEIT auf 40 Zeichen begrenzt worden.

Lösung

Darstellung nur anhand einer Beispielarbeitsmappe möglich.




StandardModule: Modul1

Sub Verbinden()
   Dim rng As Range
   Dim sTxt As String
   If ActiveCell.Column <> 1 Then Exit Sub
   For Each rng In Selection
      If sTxt = "" Then
         sTxt = rng.Value
      Else
         sTxt = sTxt & "," & rng.Value
         
      End If
   Next rng
   Range("B1").Value = sTxt
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Feature und Gültigkeit