Nadat ik van Excel 2003 ben overgegaan op 2007 krijg in de volgende foutmelding als ik betreffende worksheet activeer:
'Compileerfout: Kan het project of de bibliotheek niet vinden'
Private Sub Worksheet_Activate()
'Converteer naar hoofdletters
Dim Rng As Range
For Each Rng In Worksheets("Januari").Range("O6:Z25")
If Rng.HasFormula = False Then
Rng.Value = StrConv(Rng.Value, vbProperCase)
End If
Next Rng
End Sub
Tevens ontvang ik dezelfde compileer foutmelding bij onderstaande:
'Afsluiten zonder op te slaan middels button Afsluiten
Sub CommandButton3()
Application.DisplayAlerts = False
Afsluiten = MsgBox("Afsluiten zonder op te slaan ?", vbQuestion + vbYesNo, "Afsluiten Forecast bestand")
If Afsluiten = vbYes Then
BooleanForClosing = True
ActiveWorkbook.Close
Application.DisplayAlerts = True
IsClosed = True
Else
Range("C10").Activate
Cancel = True
End If
End Sub
Nogmaals, in Excel 2003 werkt dit alles prima.
Wie o wie kan mij helpen met bovenstaande; alvast bedankt !
'Compileerfout: Kan het project of de bibliotheek niet vinden'
Private Sub Worksheet_Activate()
'Converteer naar hoofdletters
Dim Rng As Range
For Each Rng In Worksheets("Januari").Range("O6:Z25")
If Rng.HasFormula = False Then
Rng.Value = StrConv(Rng.Value, vbProperCase)
End If
Next Rng
End Sub
Tevens ontvang ik dezelfde compileer foutmelding bij onderstaande:
'Afsluiten zonder op te slaan middels button Afsluiten
Sub CommandButton3()
Application.DisplayAlerts = False
Afsluiten = MsgBox("Afsluiten zonder op te slaan ?", vbQuestion + vbYesNo, "Afsluiten Forecast bestand")
If Afsluiten = vbYes Then
BooleanForClosing = True
ActiveWorkbook.Close
Application.DisplayAlerts = True
IsClosed = True
Else
Range("C10").Activate
Cancel = True
End If
End Sub
Nogmaals, in Excel 2003 werkt dit alles prima.
Wie o wie kan mij helpen met bovenstaande; alvast bedankt !