Thema Datum  Von Nutzer Rating
Antwort
11.06.2019 10:42:18 Sarah
NotSolved
Blau Tabelle formatieren
 11.06.2019 23:22:03 Gast54670
NotSolved

Ansicht des Beitrags:
Von:
Gast54670		 Datum:
11.06.2019 23:22:03		 Views:
456		 Rating:
     
Antwort:
  Ja
Thema:
Tabelle formatieren

Moin,
wenn das dein Thema ist so:

Hat deine Arbeitsmappe Standard 60 Formatvorlagen (1 - 60) für Tabellen geeignet

ActiveSheet.ListObjects(1).TableStyle = ThisWorkbook.TableStyles(1)

Die einzelnen Eigenschaften der Elemente in der  TableStyleElements Collection kannst du nur auslesen, aber nicht ändern.

Sub Test2()

Dim TbSt As TableStyle, x As Long

   For x = 1 To ThisWorkbook.TableStyles.Count
   Set TbSt = ThisWorkbook.TableStyles(x)
   If TbSt.ShowAsAvailableTableStyle Then _
      Debug.Print x, TbSt.Name
   Next x

End Sub

Workaround, eine benutzerdefinierte Formatvorlage erzeugen *)
(beginnt dann mit Index 171)
und diese dem Tabellenobjekt zuweisen.


*) über Menü - Tabellentools - Entwurf, denn zu dem Vorgang ein extra Makro schreiben ist wie Marille auf Ecstasy


LG

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:



  • 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
11.06.2019 10:42:18 Sarah
NotSolved
Blau Tabelle formatieren
 11.06.2019 23:22:03 Gast54670
NotSolved