Discussion :

[VieuxGeek]

Bonjour Chers Amis passionnés d'Informatique.

Eternel débutant, je voudrais pouvoir OUVRIR un fichier EXCEL 2016 depuis un formulaire Access 2016... Windows 10 bien sûr.

Mettre QUOI dans le bouton ???? Merci de m'écrire ce bout de code VBA

Explications simple car suis très mauvais.

Merci à tous et bonne soirée.

Bernard

[harpyopsis]

Bonjour !

Voilà ce qui marche pour moi...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
    DoCmd.Hourglass True
 
    Dim appExcel As Excel.Application, myWorkbook As Excel.Workbook
 
    Set appExcel = CreateObject("Excel.Application")
    Set myWorkbook = appExcel.Workbooks.Open(GetDBPath(YrEntityID, 1, "Decla_Compta_Mens") & Me.listComptaFiles.Column(1))
    appExcel.visible = True
 
    Set appExcel = Nothing
    Set myWorkbook = Nothing
 
    DoCmd.Hourglass False

Bon courage !

phil

[VieuxGeek]

Merciiiiiiiiiiiii harpyopsis,

J'essaye cela cet après midi...

Cela parait simple et pourtant je n'avais pas trouvé d'applications pour copier ce code (Eh, oui.. Car suis d'une génération - Né en 1947- qi n'avait pas de cours informatique...).

Merci pour tout et passe une bonne journée.

Bernard

PS je vais marquer résolu.

[harpyopsis]

Hello Bernard !

Il suffit d'avoir le chemin + un nom de fichier pour ouvrir ! Dans mon exemple les chaines path et filename étaient construites par morceaux accolés.

Sinon si tu veux exporter des données depuis Access vers Excel il y a ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, _
                        "Costs", MyPath, True

où "Costs" est le nom d'une table, d'une requête, d'une QueryDef, ou tout ce que tu veux d'autre !

L'informatique a l'avantage d'entretenir les neurones. Mais pas les abdominaux...

[VieuxGeek]

Merci harpyopsis, mais je vais juste ouvrir dans ma BD Access une feuille Excel pour mettre mes mots de passe (Avant que j'attrape l'Alzheimer)...

Donc :
Une colonne pour le site,
une colonne pour l'ID
Une colonne pour le password
et une pour des commentaires.

sur 1 ligne et 4 colonnes
Ex.: Windows 10 machin@orange.fr euros1992? Pour ouvrir sessions de Win 10
et ainsi de suite...

Voilà mon travail de retraité durant le futur confinement que je pressent arriver hélas.
Amicalement. Bonne jouirnée.
Bernard

[harpyopsis]

...et une colonne aussi pour les nombreux Serial Numbers !

La cinquième colonne, quoi !

[VieuxGeek]

Ah oui je l'avais oubliée cette colonne.. Mais comme toute application, elle évoluera au fil des avancées technologiques...

Avant ma BD avait Nom, prénom, tél. et E-mail. (Une seule table)

Maintenant c'est Nom, prénom, prénom du conjoint, Code Postal, sous commune, URL sites (2 lignes), E-mail (5 lignes), date de naissance, Date de décés, etc...
4 tables... Avec des listes déroulantes, etc...

Toujours TOUT est en évolution.
à+
Merci harpyopsis