Thema: Linien setzen und löschen

Home

Gruppe

Format

Problem

Einem ausgewählten Bereich sollen Linien hinzugefügt bzw. vorhandene gelöscht werden.

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: Modul1

Sub LinienEinAus()
   With Selection.Borders
      If .LineStyle = xlContinuous Then
         .LineStyle = xlNone
      Else
         .LineStyle = xlContinuous
         .Weight = xlThin
      End If
   End With
End Sub

Beiträge aus dem Excel-Forum zu den Themen Format und Bereich

Bedingte Formatierung vor Copy/Paste schützen	Bed. Formatierung, wenn alle Beding. erfüllt.
Dynamischer Datenbereich im Diagramm	Telefonnummer automatisch per VBA formatieren
Komplettes Excel Sheet kopieren mit Formaten	Bedingte Formatierung per VBA mit Schleife
Kartendiagramm per VBA erstellen und formatieren	Bereich als Bild speichern.
bedingte Formatierung	Zellfarbe per Cond Formatting nach Zellfarbe änder
1. freie Zelle in nicht zusammenhängenden Bereich	Bestimmtheitsmass nach vorgegebenen Bereich
UserForm im Querformat drucken	Bedingte Formatierung
Teilstringabfrage bei bedingter Formatierung	Bestimmten Bereich anhand Zeilenabgabe kopieren
Bedingte Formatierung mit UND Verknüpfung	Bereich löschen
Array - Index außerhalb des gültigen Bereichs	Textformat (VBA)
zoom auf Druckbereichsbreite anpassen	Bedingte Formatierung Frage
Array in Tabelle kopieren, Verlust von Format	Übernahme in Word Format wird nicht übernommen
VBA, 4 Informationen in 4 Zellen schreiben	bedingte Formatierung mit mehreren Bedingungen
Datum aus Oracle-Abfrage als Datum formatieren	Bereich syncronisieren II
Bedingte Formattierung	Bedingte Formatierung - kleiner als Fehler
Zahlenformat Handynr.	Diagramme und ihr Format
Zeilenbereich auf Tabelle übertragen	Druchbereiche auf eine Seite
bedingte formatierung per VBA	Bedingte Formatierung bezogen auf 2. Zelle
Formatgleichheit von Zeichenfolgen für SVERWEIS	bedingte Formatierung
Bedingte Formatierung	Tabellen - Zellen - Formatieren -
Definitionsbereich	Bereich von rechts nach links auslesen?
Format übertragen	Datumsformatierung
Formatierung anderer Diagramme	Namen definieren für bestimmten Bereich
Nur einen Eintrag im Bereich zulassen	Kommentar in erste zelle einess Bereiches
Zellenformatierung speichern