Ouvrir un fichier excel avec des variable

VincMalin Messages postés 11 Date d'inscription vendredi 11 novembre 2016 Statut Membre Dernière intervention 20 février 2017 - Modifié par NHenry le 13/11/2016 à 15:52
NHenry Messages postés 15112 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 13 avril 2024 - 13 nov. 2016 à 16:49
Bonjour,
Je souhaite ouvrir un fichier excel avec des variables. J'ai en parti réussi mais la saisie de ma variable "affaire" est longue. Je souhaite limiter la saisie aux 4 ou 5 premier caractères. Il faut peu être utilisé * mais je ne vois pas comment. Merci de votre aide.

Voici mon code :
année = TextBox1 
affaire = TextBox2 
Workbooks.Open Filename:="D:\Users\Documents\" & année & "\" & affaire & ".xls"


EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici : ICI

Merci d'y penser dans tes prochains messages.

2 réponses

NHenry Messages postés 15112 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 13 avril 2024 159
Modifié par NHenry le 13/11/2016 à 15:52
Regardes la fonction Dir(...) As String

De plus évites les noms de variable avec des accents ou des caractères spéciaux.

J'interviens principalement en VB6 et VB.NET, avec un peu de C#, mais la modération m'amène souvent sur d'autre langages.
En VB.NET pensez à activer "Option Explicit" et "Option Strict"
0
VincMalin Messages postés 11 Date d'inscription vendredi 11 novembre 2016 Statut Membre Dernière intervention 20 février 2017
13 nov. 2016 à 15:58
Voici comment j'ai déclaré mes variables :

Dim affaire As String
Dim année As String

en faite je souhaite saisir uniquement que le début de ma variable
dans ma textBox2 du genre : A1251 " puis le reste je ne m'en n'occupe pas ".
0
NHenry Messages postés 15112 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 13 avril 2024 159
Modifié par NHenry le 13/11/2016 à 16:04
As-tu regardé l'aide de la fonction Dir ?
Et pour les noms de variable, c'est juste un conseil.
0
VincMalin Messages postés 11 Date d'inscription vendredi 11 novembre 2016 Statut Membre Dernière intervention 20 février 2017
13 nov. 2016 à 16:23
Oui j'ai regardé mais je vois pas si dans mon cas elle est utile et comment l'utiliser.
0
NHenry Messages postés 15112 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 13 avril 2024 159
13 nov. 2016 à 16:30
Cette fonction te permet de lister les fichier avec les jokers ( * ? ) et te retourne le nom du fichier premier fichier correspondant, à toi d'utiliser cette valeur pour ton code.
0
VincMalin Messages postés 11 Date d'inscription vendredi 11 novembre 2016 Statut Membre Dernière intervention 20 février 2017
13 nov. 2016 à 16:38
Désolé pas compris. Un exemple ?
0
NHenry Messages postés 15112 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 13 avril 2024 159
13 nov. 2016 à 16:49
Essaye de voir ce que fait la fonction ...
Msgbox Dir$("D:\Users\Documents\2016\A1251*.xls")
0
Rejoignez-nous