factureren

Status
Niet open voor verdere reacties.
DClewis

DClewis

Gebruiker
Lid geworden
25 feb 2020
Berichten
46
Ik heb een in mijn ogen prachtig tool gevonden om te factureren maar ik krijg de foutmeldingen er maar niet uit.
Ik moet elke keer de tabbladen van de beveiliging halen en dat lukt zonder paswoord.
Echter bij het afsluiten en opnieuw opstarten van de tool zit de beveiliging er weer op en krijg ik eerst een foutmelding waarna het zelfde verhaal.

Waar moet ik zoeken?
 

Bijlagen

  • werken aan Facturatie.zip
    1,1 MB · Weergaven: 33
Onderstaande staat er in bladmodule 'factuuroverzicht'.

Code: 
Sheets("Factuuroverzicht").Protect , AllowFiltering:=True

Voor de rest staan er regelcodes in waar je niets aan hebt (niets doet); bv in Thisworkbook.Open()
Code: 
Dim wSheetName As Worksheet
    For Each wSheetName In Worksheets
       
    Next wSheetName
 
Oke 1 foutmelding is er uit waarvor dank maar nu krijg ik deze:
 

Bijlagen

  • Knipsel.PNG
    Knipsel.PNG
    5,8 KB · Weergaven: 40
  • Knipsel2.PNG
    Knipsel2.PNG
    16,3 KB · Weergaven: 43
Laatst bewerkt:
Shape "copyright' zit niet in het actieve werkblad.


draai onderstaande code maar eens.
Code: 
sub test()
dim sh as shape
for each sh in activesheet.shapes
msgbox sh.name
next sh
end sub
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan