Wie kann ich einen Tannenbaum mit * in VBA Excel programmieren?

Hallo.

Ich will einen Tannenbaum mit * erstellen, aber schaffe es nur so:

Das Problem ist, dass er von links nach rechts wie eine halbe Pyramide ist. Ich möchte aber, dass er wie eine echte Tanne aussieht. Also das erste Sternchen * oben mittig, dann in der nächsten Reihe wieder mittig, usw..

Ich weiß nur, dass man irgendwie mit Leerstrings arbeiten muss. Es soll auf jeden Fall am Ende wie ein Baum oder eine Pyramide sein. Danke.

Bisher habe ich diesen Code:

Private Sub tannenbaummodel()
  Dim n
  Dim a
  Dim zweig As String
  
  For n = 1 To 5
    zweig = ""

    For a = 1 To n
      zweig = zweig & ""
    Next

    Debug.Print zweig
  Next
End Sub

Answer 1

[klausbacsi]

Ich würde weitere 2 Schleife einfügen, wo du wie bereits gesagt hast, Leerzeichen vor und nach zweig einsetzt (der Zähler müsste natürlich dann rückwärts zählen, damit die Summe der Zeichen in einer Zeile immer 5 ergibt).

Comments

[danhoffmann007]

Vielen Dank für deine Antwort, das hat mir sehr weiter geholfen.