Just nu i M3-nätverket
Gå till innehåll

VBA Tidstämpel krånglar


MvS

Rekommendera Poster

Jag har en matrikel där jag har infogat en tidstämpelfunktion som har funkat hyggligt men nu krånglar. 

Har prövat lite olika varianter men får vid varje uppdatering upp en dialogruta med "Ogiltigt proceduranrop eller argument". (Se bifogad bild.)
Det är ett enkelt skript men jag blir inte klok på vad som felas - någon som vet bättre än mig? 

Bifogar skriptet som txt-fil!

 

error.png

VBA Timestamp.txt

 

Infogar texten direkt, förenklar kanske lite:

Private Sub Worksheet_Change(ByVal Target As Range)

    Call Modul1.TaBortSkydd
    
    Application.EnableEvents = False
    ActiveSheet.ListObjects("Tabell2").Range.Select
        With Selection
            If Target.Column <= 13 Or Target.Column >= 15 Then
            Range("N" & Target.row).Value = Date
            End If
        End With
    Application.EnableEvents = True
    Call Modul1.Skydd
    
End Sub

/Mikael63, moderator

Länk till kommentar
Dela på andra webbplatser

Ove Söderlund

Jag tar för givet att du har säkerställt att subbarna TaBortSkydd och Skydd finns i Modul1.

 

Testa att göra din Worksheet_Change publik genom att ta bort ordet Private.

Sub Worksheet_Change(ByVal Target As Range)

 

 

Länk till kommentar
Dela på andra webbplatser

Tack för svar!

Jag har prövat det mesta inklusive de tips du kommer med men utan framgång...
När jag gjort föreslagna ändringar så antingen skapas ingen tidstämpel alls eller så skapas en men med dialogrutan "Ogiltigt proceduranrop..." som pop-up!

Länk till kommentar
Dela på andra webbplatser

Arkiverat

Det här ämnet är nu arkiverat och är stängt för ytterligare svar.



×
×
  • Skapa nytt...