Besten,
waarschijnlijk een hele basale vba-vraag, maar voor mij een grote puzzel... Ik heb enkele variabelen gedeclareerd en wil dit nu gebruiken om bestanden op te slaan en te openen. Bij het testen wordt een fout gegeven bij "thisworkbook.saveas". Ik zal ergens een foutje hebben gemaakt in de declaratie of het gebruik ervan, maar ik kan hem niet vinden.
waarschijnlijk een hele basale vba-vraag, maar voor mij een grote puzzel... Ik heb enkele variabelen gedeclareerd en wil dit nu gebruiken om bestanden op te slaan en te openen. Bij het testen wordt een fout gegeven bij "thisworkbook.saveas". Ik zal ergens een foutje hebben gemaakt in de declaratie of het gebruik ervan, maar ik kan hem niet vinden.
Code:
Dim strPersKK As String
Dim strPad As String
Dim strAfdOverzicht As String
Dim strJaar As String
strPad = "G:\04_Monodisciplinary\01_Knowledge_Development\Knowledge Management\kennis in kaart\2.under construction\K.I.K. templates under construction\proefversies\CNS\"
strPersKK = Sheets("technische kennis CNS").Range("C2").Value
strAfdOverzicht = "AFDELINGSOVERZICHT_CNS.xlsm"
strJaar = Me.txtJaar.Value
ThisWorkbook.SaveAs strPad & strPersKK, FileFormat:=52
Workbooks.Open strPad & strAfdOverzicht