Navigation

   Hej !

Jeg har lavet en Makro som resetter / 0-stiller felter af importerede data.
Når jeg kører makroen efter at jeg har importeret externe data resetter / 0-stiller makroen også fint nok, men kører jeg makroen endnu en gang, altså efter at jeg har resettet / 0-stillet får jeg fejl:

Makroen med fejl ser således ud :

Sub Reset052()
'
' Reset052 Makro
' Makro indspillet af SP
'

'
    Sheets("0").Select
    Range("A1:AB105").Select
    ActiveSheet.Unprotect "'"
    Selection.ClearContents
    Selection.QueryTable.Delete
    ActiveWindow.SmallScroll Down:=-12
    Range("A1").Select
    ActiveSheet.Protect Password:="'", DrawingObjects:=True, Contents:=True, Scenarios:=True
    Sheets("c052").Select
    Range("B7").Select
    ActiveCell.FormulaR1C1 = ""
    Range("B8").Select
    ActiveCell.FormulaR1C1 = ""
    Range("B9").Select
    ActiveCell.FormulaR1C1 = ""
    Range("B10").Select
    ActiveCell.FormulaR1C1 = ""
    Range("I19").Select
    ActiveCell.FormulaR1C1 = "0"
    Range("I20").Select
    ActiveCell.FormulaR1C1 = "0"
    Range("I21").Select
    ActiveCell.FormulaR1C1 = "0"
    Range("A1:N1").Select
    ActiveSheet.Protect Password:="'", DrawingObjects:=True, Contents:=True, Scenarios:=True
    ActiveWorkbook.Save
End Sub

Er der nogen der kan hjælpe mig til at denne makro kan køre selv om data allerede er slettet ?
Hej Timer.

Navigation

Makrofejl ved reset af extern data