Opgelost Opslag en naam excel sheet

[pvag]

Best luitjes,
Ik heb een excel sheet waarin ik specifieke ziektekosten, parkeerkosten etc invoer om later aan mijn belasting adviseur te verstrekken voor de belastingaangifte. Ik gebruik Windows 11.
Ik heb in een map "Belastingdienst" staan op mijn D: schijf waarvan het path luidt: D:\Werkmap_Ton\My_docs\Excel-docs\Belastingdienst
In de map belastingdienst heb ik wederom voor elk boekjaar een map aangemaakt. De bestandsnaam van de sheet is "Ziektekosten 2025" Ik wil dat de sheet op een of andere manier voor elk nieuw boekjaar het jaartal van het boekjaar achter de naam "Ziektekosten 2025, Ziektekosten 2026 etc. Maar ook dat de sheet in de juiste map wordt opgeslagen. Dus Ziektekosten 2025 in de map 2025 enz. Het is de bedoeling dat het jaartal wat achter de bestandsnaam komt staan gehaald wordt uit de cel E2 van het het tabblad "Dashboard". Het path voor opslaan van de sheet wordt gehaald uit cel B50 van het tabblad "Param". Ik kom er als leek niet uit. Wie kan me helpen.

 

[edmoor]

Moet het pad nou D:\Werkmap_Ton\My_docs\Excel-docs\Belastingdienst zijn of wat er in het blad Param in cel B50 staat?

Tip:
Vergeet die hele ChDir opdracht, die is nergens voor nodig.
Ik neem aan dat je met "sheet" je document bedoelt.
Een sheet is een werkblad, niet een werkboek.

 

[Senso]

Dat viel mij ook direct op.
A worksheet (also known as a spreadsheet) consists of cells in which you can enter and calculate data. The cells are organized into columns and rows. A worksheet is always stored in a workbook. A workbook can contain many worksheets. Think of it as a book.

Verder vind ik het vrij ingewikkeld. Als het alleen gaat om ziektekosten, parkeerkosten etc. dan maak je toch één document en gebruik tabbladen voor de verschillende jaren.

 

[pvag]

Hallo Edmo,
bedankt voor je bericht. Ik ben 75 jaar maar een leek. Wat er in het blad Param in cel B50 staat? moet gebruikt worden als path voor de opslag van het document.

 

[edmoor]

Zo dus?

Private Sub Afsluiten_Click()
    ThisWorkbook.SaveAs Sheets("Param").Range("B50") & "\Ziektekosten " & Sheets("Dashboard").Range("E2")
    Application.Quit
End Sub

Misschien handig als je even laat zien wat er precies in cel B50 van het werkblad Params staat.

 

[pvag]

Hoi Edmoor,
Bedankt voor je hulp. Het werkt nu goed, doch ik zou de bestands naam "Ziektekosten 1-1-2025" gewijzigd willen zien in "Ziektekosten 2025" dus alleen het jaartal. In Cel E2 van Dashboard wordt alleen het jaartal weergegeven, wat ook juist is.

 

[edmoor]

Dat zal dan het uiterlijk van cel E2 zijn terwijl wel de hele datum erin staat.
Maak die cel leeg en zet er alleen het getal 2025 in, dus niet als datum.
Of deze formule: =Jaar(Vandaag())

 

[pvag]

Hoi Edmoor,
Ik doe dat dan is het opgelost. Bedankt voor je hulp.