eksileri silme makrosu

[XExcel]

selam asagdikai tablo'da eksileri otomatik silen bir makro yazabilirmisiniz

Tesekurler

 

[Ömer]

Merhaba,

Silmeden kastınız negatif sayıları pozitif yapma sanırım.

Bu şekilde deneyin..

Option Explicit
 
Sub Mutlak()
Dim alan As Range
    For Each alan In Range("A1:V1000")
        If alan <> "" Then
            alan = Abs(alan)
        End If
    Next alan
End Sub

.

 

[XExcel]

çok teşekürler