Thema Datum  Von Nutzer Rating
Antwort
02.05.2020 13:38:09 Jonas
NotSolved
02.05.2020 14:00:31 Gast01233
NotSolved
02.05.2020 14:23:39 xlKing
****
Solved
Blau Spaltenformatierung zusammenfassen
 02.05.2020 14:38:53 xlKing
*****
Solved

Ansicht des Beitrags:
Von:
xlKing		 Datum:
02.05.2020 14:38:53		 Views:
811		 Rating:
     
Antwort:
 Nein
Thema:
Spaltenformatierung zusammenfassen

Oder wenn du Union nicht verwenden möchtest, kannst du auch über eine Schleife gehen. Dann werden die Spalten nacheinander angepasst. Sieht dann z.B. so aus.

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Sub Spaltenbreiteanpassen()
  
Dim sText As Variant
Dim iCol As Integer
  
Dim lRow As Long
  
On Error Resume Next
  
sText = Array("Miez", "Muz", "Maunzi")
lRow = 1
  
For Each p In sText
  iCol = Application.WorksheetFunction.Match(p, Cells(lRow, 1).EntireRow, False)
  If Not IsError(iCol) Then Columns(iCol).ColumnWidth = 7.8
Next p
   
End Sub

Gruß Mr. K.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:
WYSIWYG-Editor, ctl00_Content_editor1



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
02.05.2020 13:38:09 Jonas
NotSolved
02.05.2020 14:00:31 Gast01233
NotSolved
02.05.2020 14:23:39 xlKing
****
Solved
Blau Spaltenformatierung zusammenfassen
 02.05.2020 14:38:53 xlKing
*****
Solved