Bonjour,
J'essaye de faire une appli sur excel avec VBA.
Je voudrais que lorsque qu'on clik sur un bouton, charger une feuille excel mais en nayant k les droits en lecture et rien d'autre. Voici une ebauche. mon seul soucis cest ke je ne vx pas utiliser le opentextfile car il me demande l'emplacement d'un fichier. Dans mon cas cest une feuille excel. merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Private Sub Consultation_Click() Dim objet As Object, fichier As Object Set objet = CreateObject("Scripting.FileSystemObject") Set fichier = opentextfile("C:\fichier.txt") Do While fichier.ReadLine MdgBox fichier.ReadLine Loop fichier.Close End Sub
Partager