Thema Datum  Von Nutzer Rating
Antwort
07.02.2024 14:01:57 Marcel H.
NotSolved
07.02.2024 14:44:00 Gast55634
NotSolved
Rot Eingabemaske auch zum bearbeiten
07.02.2024 15:32:22 Gast53243
NotSolved
07.02.2024 15:58:12 Mase
NotSolved
07.02.2024 18:00:46 Flatulenz
NotSolved
07.02.2024 19:33:17 ralf_b
NotSolved
07.02.2024 19:37:50 Flatulenz
NotSolved
07.02.2024 19:46:17 ralf_b
NotSolved
08.02.2024 04:58:20 Gast01233
NotSolved

Ansicht des Beitrags:
Von:
Gast53243
Datum:
07.02.2024 15:32:22
Views:
175
Rating: Antwort:
  Ja
Thema:
Eingabemaske auch zum bearbeiten

moin

hier zumindest schonmal etwas schlanker für die Rahmenmalerei

Sub Rahmenschleife()
    Dim X As Integer
    With Columns("D:D")
        .Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
    End With
    With Range("D1:D160")
        For X = 7 To 12 'xlEdgeLeft=7,xlEdgeTop=8,xlEdgeBottom=9,xlEdgeRight=10, xlInsideHorizontal=12
            With .Borders(X)
                .LineStyle = xlContinuous
                .Weight = xlThin
                .ColorIndex = 0
            End With
        Next
    End With
    With Range("D3").Borders(xlEdgeBottom)
        .Weight = xlMedium
    End With
    Columns("D:D").ColumnWidth = 15
End Sub

 


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
07.02.2024 14:01:57 Marcel H.
NotSolved
07.02.2024 14:44:00 Gast55634
NotSolved
Rot Eingabemaske auch zum bearbeiten
07.02.2024 15:32:22 Gast53243
NotSolved
07.02.2024 15:58:12 Mase
NotSolved
07.02.2024 18:00:46 Flatulenz
NotSolved
07.02.2024 19:33:17 ralf_b
NotSolved
07.02.2024 19:37:50 Flatulenz
NotSolved
07.02.2024 19:46:17 ralf_b
NotSolved
08.02.2024 04:58:20 Gast01233
NotSolved