Lidt kodestumper

Beskrivelse

Lidt nyttinge kodestumper

Se mere når du har købt kurset

Øvelse

Her kommer der en samling af nyttige kodestumper som f.eks. denne standard sub:

Sub c()     On Error GoTo errortrap     Dim cal As Integer     cal = Application.Calculation     Application.Calculation = xlCalculationManual     Application.ScreenUpdating = False                    Application.Calculation = cal     Application.ScreenUpdating = True     Exit Sub  errortrap:     MsgBox "Der er gået noget galt" & vbCrLf & Err.Description     Application.Calculation = cal     Application.ScreenUpdating = True End Sub

Forrige Hent data fra tekst

Næste Fælles kodebase

Brug for hjælp til VBA, VSTO eller SQL?

Scient Data tilbyder professionel IT-konsulentbistand

Kontakt Scient Data →