Works perfectly :), thanks a million.
On 6 June 2013 17:01, ashish koul wrote:
> see if it helps
> Sub test()
> Dim wk As Worksheet
> Dim i As Long
> Application.ScreenUpdating = False
> Application.DisplayAlerts = False
> Application.Calculation = xlCalculationManual
>
> For Each wk In ThisWork
see if it helps
Sub test()
Dim wk As Worksheet
Dim i As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.Calculation = xlCalculationManual
For Each wk In ThisWorkbook.Worksheets
For i = wk.Range("a" & wk.Rows.Count).End(xlUp).Row To 2 Step -1
If wk.
Hi guys,
I have a file that has 4 worksheets A,B,C,D and eveyrone has 3 columns with
"Name", "Age", "Profession", and I want to delete the rows that have the
column "Age" blank, I can do this with a static Macro fo check 4 columns,
but sometimes I receive the file with only A worksheet or A & B, s