Je gebruikt een verouderde webbrowser. Het kan mogelijk deze of andere websites niet correct weergeven. Het is raadzaam om je webbrowser te upgraden of een browser zoals Microsoft Edge of Google Chrome te gebruiken.
Ik wil exact hetzelfde doen als jij. Kan je die code dan aan een knop toevoegen? Ik bouw een macro altijd op via ontwerpen in het macroveld en ben dus niet zo VBA onderlegd....
dit is de code die er staat onder mijn knop;
wat je hiervoor nodig hebt is alleen een query
bij mij heet die "overzicht van de gegevens";
de errorhandling is niks anders voor u;
kopieer dit en verander het adhv u query.
Je hebt hier GEEN rapport voor nodig gelijk
voor een Word-link.
Private Sub cmdEXCEL_Click()
On Error GoTo Err_cmdRapportGezocht_Click
If strSQL = "" Then
MsgBox " Gelieve eerst gegevens te zoeken."
Exit Sub
End If
Dim stDocName As String
Dim lst As QueryDef
Set lst = CurrentDb.QueryDefs("Overzicht van de gegevens")
lst.SQL = Me.KzlActiesss.RowSource
DoCmd.OutputTo acOutputQuery, "Overzicht van de gegevens", acFormatXLS, "gegevens.xls", True
Set lst = Nothing
Exit_cmdRapportGezocht_Click:
Exit Sub
Err_cmdRapportGezocht_Click:
MsgBox err.Description
Resume Exit_cmdRapportGezocht_Click
End Sub
Veel plezier ermee halmar
ik hoor wel als er iets scheelt
Ik ga wel even kijken of ik er iets uit kan halen waarmee ik toch direct een rapport kan exporteren. Ik wil dit rapport namelijk netjes opmaken zodat we dit de organisatie in kunnen sturen. Omdat er idd gewoon een knop in de taakbalk voor is nam ik aan dat er bij het opbouwen van een macro ook wel een opdracht voor te geven zou zijn, maar ik kan hem ook niet vinden en Access help slaat echt helemaal nergens op....
Onze accountmanagers hebben ook geen knoppenbalk en wil ik middels een macro het rapport laten exporteren.
is het zo dat je naar excel een query stuurt
en met word een rapport, die gelinkt is aan een query.
bij mijn VBA is het zo dat ik bij mijn excel-knop geen
rapport nodig heb. kan ik een rapport aanmaken en deze
leiden naar excel? ja? met welke VBA dan?
