Sütun silme makrosu
Sütun silme makrosu
Belirli bir aralıktaki (örneğin: I-V arası) sütunları silmek için makro kodu nedir?
- Hamurcu
- Mesajlar: 265
- Kayıt: 06 Ağu 2012, 00:14
- İşletim Sisteminiz: Windows 10/11 - Pardus Linux
- LibreOffice Sürümü: 7.x
Re: Sütun silme makrosu
Merhaba,
Aşağıdaki şekilde yapabilirsin.
Aşağıdaki şekilde yapabilirsin.
Kod: Tümünü seç
Sub SutunlariSil
Dim oSheets As Variant
Dim oSheet As Variant
Dim oColumns As Variant
Dim BaslangicSutunu As Integer
Dim SutunSayisi As Integer
oSheets = ThisComponent.getSheets()
oSheet = oSheets.getByName("Sayfa1")
oColumns = oSheet.getColumns()
BaslangicSutunu=1
SutunSayisi=4
oColumns.removeByIndex(BaslangicSutunu, SutunSayisi) 'BaslangicSutununundan itibaren SutunSayisi kadar Sutunu siler (BaslangicSutunu Dahil)
End Sub
Re: Sütun silme makrosu
Teşekkürler