---

Hallo,

ich schreibe mit einem Makro Parameterwerte in eine Excelliste mit dem CATScript. Nun möchte ich die Zellen, in die das Makro ein Wert schreibt Einrahmen.

Hat jemand vielleicht eine Idee?

Vielen Dank.

Gruß Timo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Servus
Schau mal in der Excel-Doku (oder im Netz) nach "range" und "border".

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Bernd,

erstmal vielen Dank für die Info. Ich habe folgendes gefunden.

Sub x()
  With Range("A1:M" & Range("A200").End(xlUp).Row)
      .Borders(xlDiagonalDown).LineStyle = xlNone
      .Borders(xlDiagonalUp).LineStyle = xlNone
      With .Borders
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
      End With
  End With
End Sub

Ich weis jetzt aber überhaupt nicht, wie ich diesen Code in mein CATScript mit einbauen kann? Die Excel-Mappe öffne ich mit.

Set objXL = GetObject("...")

objXL.Application.Visible = True

objXL.Parent.Windows(1).Visible = True

Kann mir jemand weiterhelfen?

Danke.

Gruß Timo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP