Vba: jak usunąć obramowania komórek
Aby usunąć obramowanie komórek w określonym zakresie, możesz użyć następującej podstawowej składni w VBA:
Sub RemoveBorders()
Range(" A1:B12 ").Borders.LineStyle = xlNone
End Sub
Ten konkretny przykład usuwa wszystkie obramowania z komórek w zakresie A1:B12 .
Poniższy przykład pokazuje, jak zastosować tę składnię w praktyce.
Przykład: użycie języka VBA do usunięcia obramowań komórek
Załóżmy, że mamy w programie Excel następujący zbiór danych zawierający informacje o różnych koszykarzach:
Załóżmy, że chcemy usunąć obramowania każdej komórki w zakresie A1:B12 .
W tym celu możemy utworzyć następujące makro:
Sub RemoveBorders()
Range(" A1:B12 ").Borders.LineStyle = xlNone
End Sub
Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:
Należy zauważyć, że obramowania wokół każdej komórki w zakresie A1:B12 zostały usunięte.
Aby usunąć obramowanie komórek w innym zakresie, po prostu zamień A1:B12 na inny zakres w makrze.
Uwaga : Pełną dokumentację właściwości LineStyle VBA można znaleźć tutaj .
Dodatkowe zasoby
Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania przy użyciu języka VBA:
VBA: Jak policzyć liczbę arkuszy w skoroszycie
VBA: Jak policzyć liczbę wierszy w zakresie
VBA: Jak znaleźć ostatnio używaną linię