kobejul08
Messages postés113Date d'inscriptionvendredi 15 avril 2005StatutMembreDernière intervention 3 octobre 2005
-
7 juin 2005 à 14:59
kobejul08
Messages postés113Date d'inscriptionvendredi 15 avril 2005StatutMembreDernière intervention 3 octobre 2005
-
8 juin 2005 à 09:37
Bonjour
voici mon probleme dans le code .. il me met comme message d'erreur application or object defined error..
quelqu'un pourrait il m'aider a voir ou las bas blesse Merci
Set monxl3 = New Excel.Application
monxl3.Workbooks.Open Chemin
For i = 1 To 34
monxl3.Cells(i, 2).Select
If monxl3.Selection.Value = Txtdétails1(i).Text Then
monxl3.Cells(i, 4).Select
Txtprix1(i).Text = monxl3.Selection.Value
Exit For
End If
Next i
tof008
Messages postés695Date d'inscriptionjeudi 5 mai 2005StatutMembreDernière intervention 5 janvier 201033 7 juin 2005 à 15:10
Set monxl3 = New Excel.Application
monxl3.Workbooks.Open Chemin
For i = 1 To 34
monxl3.Cells(i, 2).Select
If monxl3.Selection.Value = Txtdétails1(i).Text Then
monxl3.Cells(i, 4).Select
Txtprix1(i).Text = monxl3.Selection.Value
End If
Next i
Essaie comme ca
Il y a plusieurs facon d'être con ,mais un con choisit toujours la pire
kobejul08
Messages postés113Date d'inscriptionvendredi 15 avril 2005StatutMembreDernière intervention 3 octobre 2005 8 juin 2005 à 09:37
Oui j'ai fait tout ça , j'ai pas de message d'erreur sur les références ou de variable non déclarée ..
C'est bizarre ... je veux en fait aller chercher des options dans un classeur excel et qu'il les affiches dans Txtdétails1(i) pour le prix pareil mais il n'a pas le temps d'afficher il me met un message erreur "application or object defined error.."