Registriert seit: 19.01.2020
	
Version(en): 2007
	
 
	
	
		Hallo, 
wie kann ich den Word-Makrorecorder dazu bewegen, Mausaktionen (bspw. Ändern einer Spaltenbreite in einer Tabelle) aufzuzeichnen?
Nach dem Starten der Aufzeichnung wird das Kassettensymbol am Mauszeiger angezeigt, aber es sind keine Mausaktionen möglich.
In Excel funktioniert das ganze ja recht gut.
VG!
	
	
	
	
	
 
 
	
	
	
		
	Registriert seit: 10.04.2014
	
Version(en): 97-2019 (32) + 365 (64)
	
 
	
	
		Hallöchen,
da sehe ich was anderes ...
Code:
Option Explicit
Sub Makro1()
'
' Makro1 Makro
'
'
  ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=3, NumColumns:= _
    3, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
    wdAutoFitFixed
  With Selection.Tables(1)
    If .Style <> "Tabellenraster" Then
      .Style = "Tabellenraster"
    End If
    .ApplyStyleHeadingRows = True
    .ApplyStyleLastRow = False
    .ApplyStyleFirstColumn = True
    .ApplyStyleLastColumn = False
    .ApplyStyleRowBands = True
    .ApplyStyleColumnBands = False
  End With
  Selection.Tables(1).Columns(1).SetWidth ColumnWidth:=151, RulerStyle:= _
    wdAdjustNone
 End Sub
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
	
	
 
 
	
	
	
		
	Registriert seit: 19.01.2020
	
Version(en): 2007
	
 
	
		
		
 14.12.2021, 11:46
 
		14.12.2021, 11:46 
		
	 
	
		Hallo André, 
danke für die Rückmeldung. Ich taste mich langsam heran. 

Hast du evtl. eine Übersicht über die Befehle? Auf der MS-Seite (
https://docs.microsoft.com/de-de/office/...dwidthtype) wird es eher unübersichtlich gelistet ...
VG!
	
 
 
	
	
	
		
	Registriert seit: 10.04.2014
	
Version(en): 97-2019 (32) + 365 (64)
	
 
	
	
		Hallöchen,
eine Übersicht habe ich nicht. Du kannst aber neben dem Internet sicher auch in der Überwachung einiges herausfinden. 
Der Code ist aufgezeichnet, falls das so nicht rüber gekommen ist.
	
	
	
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)