ark markering

Sheets(Array("Ark2", "Ark3", "Ark4")).Select
    Range("A13:F25").ClearContents
Sheets("Ark1").Select
Range("A13").Select
End Sub

sådan

    Sheets(Array("Ark2", "Ark4", "Ark3")).Select
    Sheets("Ark2").Activate
    Range("A13:F23").Select
    Selection.ClearContents
    Sheets("Ark1").Select
    Range("A13").Select

Jeg modtager følgende fejlmeddelse

Metoden Select for klassen Range mislykkedes.

koden er

Sheets(Array("Ark2", "Ark4", "Ark3")).Select
    Sheets("Ark2").Activate
    Range("A13:F23").Select
    Selection.ClearContents
    Sheets("Ark1").Select
    Range("A13").Select

Det er Range("A13:F23").Select som der er noget galt med

har du flettede celler ??

har du flettede celler ??

nej

Her er lidt mere :
Følgende fejlmeddelse kommer når jeg har lagt kommandoknappen i Ark1. Det er her jeg gerne vil have den liggende.
Hvis jeg lægger den i Ark2 sletter den som den skal i ark2,3,4,, men efterlader to problemer
1) den lader de valgte områder stå tilbage som markerede
2. den har problemer med den sidste linie # Range("A13").Select # da den ikke kan gå tilbage til ark1.

Du SKAL have makroen i et modul, IKKE i et arkmodul.

Sæt koden under din knap, til at kalde makroen i modulet.

eks.

Call makronavn.

En makro i et arkmodul, kan kun arbejde i det ark den er i, derfor skal den være i et module

OK det virker. Men problemet er at jeg skulle bruge det som en del af en sammenhængende kode, men den går i står efter "Call Makro2".
Hvordan får jeg koden til at fortsætte

Private Sub CommandButton2_Click()
Call Makro2
Set sh1 = Sheets("4 ugers turnus")
Set sh2 = Sheets(sh1.Range("x14").Value)
For t = 1 To sh1.Cells(1000, "A").End(xlUp).Row
If IsDate(sh1.Cells(t, "A")) = True Then
If sh1.Cells(t, "A") >= sh1.Range("t14") And sh1.Cells(t, "A") <= sh1.Range("v14") Then
sh1.Range("A" & t & ":AA" & t).Copy sh2.Cells(sh2.Cells(1000, "A").End(xlUp).Row + 1, "A")
End If

det samme problem som den anden, du kan IKKE arbejde med andre ark i et Arkmodul, sæt resten af koden over i Makro2

OK jeg er begyndt at forstå problemet kerne og det hjælper. Du har dine point hjemme.

kabbak, skal du ikke ha point......

;-))