Thema Datum  Von Nutzer Rating
Antwort
Rot Rahmen setzen mit Range-Variable und Cells()
 01.12.2015 19:27:37 joerg
NotSolved
01.12.2015 20:31:48 Gast97051
*****
Solved
01.12.2015 22:30:37 joerg
NotSolved

Ansicht des Beitrags:
Von:
joerg		 Datum:
01.12.2015 19:27:37		 Views:
1006		 Rating:
     
Antwort:
  Ja
Thema:
Rahmen setzen mit Range-Variable und Cells()

Hallo,

ich würde gerne einen Rahmen "Alle Rahmenlinien" dynamisch setzen (also mit einer Range-Variablen und Cells()).

Leider bekomme ich es nicht hin... Was mache ich falsch?

Vielen Dank für die Hilfe im Voraus!!

Gruß Jörg

anzmwra ist eine beliebige Ganz-Zahl

Dim ra as Range
Dim anzmwra as Integer

'Rahmen
ra = Range(ActiveSheet.Cells(3, 2), ActiveSheet.Cells(3 + anzmwra - 1, 6))
With ra.BorderAround
    .LineStyle = xlContinuous
    .ColorIndex = 0
    .Weight = xlThin
End With
With ra.Borders(xlInsideVertical)
    .LineStyle = xlContinuous
    .ColorIndex = 0
    .Weight = xlThin
End With
With ra.Borders(xlInsideHorizontal)
    .LineStyle = xlContinuous
    .ColorIndex = 0
    .Weight = xlThin
End With

 

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
Rot Rahmen setzen mit Range-Variable und Cells()
 01.12.2015 19:27:37 joerg
NotSolved
01.12.2015 20:31:48 Gast97051
*****
Solved
01.12.2015 22:30:37 joerg
NotSolved