cs_actif
Messages postés1Date d'inscriptionmercredi 30 juin 2004StatutMembreDernière intervention30 juin 2004
-
30 juin 2004 à 12:03
cs_ITALIA
Messages postés2169Date d'inscriptionvendredi 20 avril 2001StatutMembreDernière intervention30 juin 2009
-
30 juin 2004 à 14:24
actif
salut
je voudrai coller une valeur dans une cellule avec une adresse dans deux case ex en a1=b et en a2=25
pour que la cellule copier aille en b25
cs_ITALIA
Messages postés2169Date d'inscriptionvendredi 20 avril 2001StatutMembreDernière intervention30 juin 20099 30 juin 2004 à 14:24
Set MonXl = CreateObject("Excel.Application") ' Ceci initialise la variable et charge Excel en arrière plan
MonXl.Visible = True 'Rend Excel visible...
MonXl.UserControl = True
MonXl.Workbooks.Open FileName:=CheminDuFichier
' Ouvre Le Fichier
MonXl.Range("A1").Value = "B" ' Attribue une valeur à une Case
MonXl.Range("A2").Value = "25"
NouvelleCase=MonXl.Range("A1").Value & MonXl.Range("A2").Value ' Tu Obtiens bien = B25
' Pour l'utiliser
MonXl.Range("NouvelleCase").Value ="IT@LI@"