Lien fichier Excel à VB6 : recherche de cellule ! [Résolu]

guilleto 258 Messages postés jeudi 23 octobre 2003Date d'inscription 20 mars 2013 Dernière intervention - 9 sept. 2004 à 12:08 - Dernière réponse : philheiz 117 Messages postés mercredi 3 décembre 2003Date d'inscription 11 octobre 2007 Dernière intervention
- 9 sept. 2004 à 14:01
J'ai un fichier Excel dans lequel j'ai des cellules portant un nom spécifique.
exemple : la cellule A1 porte le nom "CodeArticle_1" !

Comment puis-je récupérer à partir d'un programme VB le contenu de cette cellule "CodeArticle_1" sachant que seul le nom est invariant (elle pourrait très bien se trouver en C12 etc.)

Si quelqu'un possède un exemple de ce genre de programme cela serait fort sympathique de me l'envoyer !

Par avance merci !
Afficher la suite 

1 réponse

Meilleure réponse
philheiz 117 Messages postés mercredi 3 décembre 2003Date d'inscription 11 octobre 2007 Dernière intervention - 9 sept. 2004 à 14:01
1
Merci
Dim MaVariable
MaVariable=Range("CodeArticle_1").Value

Si tu es dans vb6 et non vba:

dim o_Execl as object
dim o_WBook as object
dim o_WSheet as object

Set o_Excel = CreateObject("excel.application")
Set o_WBook = o_Excel.Workbooks.Open(Nom du document)
Set o_WSheet=o_WBook.WorkSheets(Nom de la feuille)
MaVariable=o_WSheet.Range("CodeArticle_1").Value

o_WBook.Close False
o_Excel.Quit
Set o_Excel = Nothing

Merci philheiz 1

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 97 internautes ce mois-ci

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.