comment on selectionne une cellule a partir de vba

[fahd]

salut les gens du forum,
j'aurai une ptite kestion a vous posez si kelkun peut m'aider
je cherhce a selectionner une case dans une feuille excel, et récupérer cette case et lui changer de valeur, si kelkun peut m'aide se serai cool
merci d'avance a ceux ki pourrons m'aider

 

[Popeye]

Cells(X, Y).Select 'selectionne la cellule ligneX colonne Y
valeur=cells(X,Y) 'recupereur la valeur de la cellule dans la vairable cellule
cells(X,Y)="pouetpouet" 'ecrit pouetpouet dans la cellule

voila

j'espere que c ce que tu cherches

 

[fahd]

désole de te dire ca mais ca marche pas
je t'envoie mon fichier xls si tu peux m'aider merci
je ne compprend vraiment pas pkoi ca marche pas
et je suis vraimen ds la merde

 

[Jon]

rajouter ".value"

 

[fahd]

désolé john, mais ca ne marche pas , au fait ca marche si tu lance l'execution a aprtir du debugeur, "editeur vba"
mais si tu lance la macro a partir de la feuille excel tu te rendra compte ke ca plante, et k'elle ne marche pas
essaie de jeter un ptit coup d'oeuil plz
merci

 

[Jean]

Salut,
pas sûr, mais j'ai l'impression que ce qui ne va pas,
c'est de mettre une fonction dans une cellule
ex: en A1 = TestMacro() et de vouloir remplacer
la valeur de A1 par du texte à partir de la même macro...
ça crée une sorte de référence circulaire.
En fait ça marche à peu près dans le debugger
mais à la 2ème exécution de la macro.
Espérons qu'un gourou se penche sur le Pb.
A plus.

 

[Jon]

range("A1").value="toto"
variable_toto=range("A1").value
msgbox variable_toto

cells(5,2).value=variable_toto 'ce qui équivqut à écrire range("B5").value=variable_toto

 

[Popeye]

J'ai regardé un peu ce qu'il été possible de faire
apparemment (j'ai bien dit apparemment) il n'est pas possible d'écrire des valeurs dans une autre cellule que celle qui contient la formule
Par contre les msgbox marche
on peut lire les propriétés des autres cellules par exemple

Peut etre que @Thierry pourrait nous éclairer la dessus


Par contre dis nous ce que tu voudrais faire on peut peut etre t'aider autrement

 

[fahd]

merci les gars, je me suis rendu copte k'on pouvait pas intervenir sur les autres cellules en utilisant les fonctions, je vais faire une macro, et la declencherai via un boutton
merci pour tous les gars

 

[bracq]

selection de cellules

ce prog doit me permettre d effacer les cellules d une colonne qui ne sont pas dans la plage desiree. Cependant le debog me renvoie une erreur 1004 dans l une des boucles for, et j sais pas pourquoi. voila le bout de prog:
Sub toto1()
'
' toto1 Makro

Dim i As Integer
l = 1403


Sheets("ideal force Etotal 95th 64kmh").Select
For i = Sheets("Input").Cells(2, 2).Value To Sheets("Input").Cells(2, 3).Value
Sheets("ideal force Etotal 95th 64kmh").Cells(i, 4).Formula = (Sheets("ideal force Etotal 95th 64kmh").Cells(i, 2).Value / Sheets("ideal force Etotal 95th 64kmh").Cells(i, 3).Value)
Next i

For i = 0 To Sheets("Input").Cells(2, 2).Value
Sheets("ideal force Etotal 95th 64kmh").Cells(i, 4).Value = 0 (probleme ici)
Next i

For i = Sheets("Input").Cells(2, 3).Value To l
Sheets("ideal force Etotal 95th 64kmh").Cells(i, 4).Value = 0
Next i
If Cells(i, 4) = 0 Then Cells.Select
Selection.ClearContents
Else: Cells(i, 4) = Cells(i, 4)
End If


Selection.NumberFormat = "0.00000000"

End Sub

 

[Mytå]

Salut le forum

Bonjour quand meme brcaq

For i = 0 To Sheets("Input").Cells(2, 2).Value
Sheets("ideal force Etotal 95th 64kmh").Cells(i, 4).Value = 0 (probleme ici)
Next i

Normal que tu es une erreur la cellule "0" n'existe pas

lorsque que i=0 alors cells (i,4) donne cells(0,4)

Mytå