message box

[julie999]

bonjour
je cherche suivant une cellule ex en i4=4
a afficher dans un tableau a la suite en colone 1,2,3,4
puis suivant ce chiffre afficher un message box pour remplir la case de droite avec comme contenue dans le message le contenu de 2 cellules afin d'automatiser et de simplifier
je joint un bout de fichier j'espere etre claire dans mes explications
merci de votre aide
justine

 

[mutzik]

Re : message box

bonjour

ton fichier en retour
quelques commentaires :
- il vaut mieux éviter les cellules fusionnées au possible, ne les utiliser (et encore ...) que pour centrer des titres
(vois dans le fichier joint)
- j'ai mis des formules dans les cellules D6 à D15)
- également une formule différente dans ton calcul du poids total des palettes

sinon, pourquoi vouloir employer du code VBA, remplir les cellules devrait suffire ...

 

[julie999]

Re : message box

salut bertrand,le fil
ta methode fonctione tres bien sur le fichier test
j'ai un petit souci pour l'appliquer sur mon fichier
la formule que tu met en d6:d15
=SI($G$4>=LIGNE()-5;LIGNE()-5;0)


moi je met
=SI($AN$89>=LIGNE()-88;LIGNE()-88;0)
pour ceci pas de probleme
pour la macro tu met:
Sub remplir()
Dim c As Range
For Each c In Range("D6😀15")
If c.Value > 0 Then Cells(c.Row, 5) = InputBox("Poids palette " & c.Row - 5 & " ? : ")
Next c
End Sub

et moi je met
Sub remplir()
'
' remplir Macro
'

'
Dim c As Range
For Each c In Range("ak89:ak97")
If c.Value > 0 Then Cells(c.Row, 88) = InputBox("Poids palette " & c.Row - 88 & " ? : ")
Next c
End Sub

le probleme j'ai bien le message box mais quand je tape la reponse elle ne s'inscrit pas dans la cellule

d'ou vient le problème
merci Justine

 

[mutzik]

Re : message box

bonjour Justine

elle s'inscrit dans quelle cellule ?
l'instruction cells ( ligne , colonne) t'écrit la réponse que tu fournis en ligne 89 colonne 88 = CJ
vérifie les paramètres de cells (lig,col) c'est là qu'est le hic

 

[julie999]

Re : message box

re Bertrand
fait pas attention je suis blonde
oui j'ai un souci avec ligne colonne je n'arrive pas a réglé ça
peux tu jeter un coup d'oeil je te joins le bon fichier avec les bon numéro de lignes et colonnes

l’idéal serait que la cellule d72 ou i72 ou q72 est remplie ça déclenche automatiquement la macro en demandant le poids de la palette correspondante au numéro et a la destination
est ce possible ça
merci Justine
pour les cellules colorées c'est bon la formule est déjà présente j'ai suivi tes conseils