Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Copier les valeurs

1 réponse
Avatar
berlin1
Bonjour,
Je veux faire construire automatiquement un tableau de valeurs
quotidiennes qui va chercher certaines valeurs inscrites ici et l=E0
dans la feuille, toujours au m=EAme endroit, (F5-F6-F7-F8) mais qui
varient en fonction de la date du jour plac=E9e en E1.
Les dates de r=E9f=E9rence du tableau sont list=E9es de M11 =E0 M16. Je pe=
ux
faire tout ceci facilement avec la formule suivante: =3DSI
(E1=3DM11;F5;""), ensuite: =3DSI(E1=3DM11;F6;""), puis =3DSI(E1=3DM12;F5;""=
),
ensuite: =3DSI(E1=3DM12;F6;"") etc.. Ceci fonctionne si les 2 dates
concordent. Le probl=E8me est que le lendemain, si E1=3DM12, les valeurs
=E9gales =E0 E1=3DM11 s'effacent.

Ma question no 1: est-il possible, =E0 l'int=E9rieur d'une ligne de
commande (genre: =3Dsi...) d'ins=E9rer une ligne de macro qui viendrait
coller les valeurs ("selection.pastespecial paste...) Pour toutes
sortes de raisons, (surtout la compatibilit=E9 entre versions de
logiciel, et aussi le fait que je ne suis pas le seul utilisateur du
fichier - donc si =E7a plante... ) je n'aimerais pas =EAtre oblig=E9 de
cr=E9er une macro pour faire effectuer cette op=E9ration.

Ma question no 2: SVP , pourriez-vous me construire la macro en
question. Merci.

Robert, de la Beauce, au Qu=E9bec

1 réponse

Avatar
Youky \(BJ\)
Salut Le Quebec,
Prés du Beaujolais je viens de faire ceci
à mettre en ouverture de classeur
j'ai pris A1 la cellule de destination et le tout en Feuil1 changer N° si
pas idem
voir le nom en fenêtre des projets de VBA nomde gauche et non de droite

Private Sub Workbook_Open()
Feuil1.[A1] = ""
For k = 11 To 16
If Feuil1.[E1] = Feuil1.Cells(k, 13) Then
Feuil1.[A1] = Feuil1.Cells(k - 6, 6)
Exit For
End If
Next
End Sub

Youky (BJ)

a écrit dans le message de news:

Bonjour,
Je veux faire construire automatiquement un tableau de valeurs
quotidiennes qui va chercher certaines valeurs inscrites ici et là
dans la feuille, toujours au même endroit, (F5-F6-F7-F8) mais qui
varient en fonction de la date du jour placée en E1.
Les dates de référence du tableau sont listées de M11 à M16. Je peux
faire tout ceci facilement avec la formule suivante: =SI
(E1=M11;F5;""), ensuite: =SI(E1=M11;F6;""), puis =SI(E1=M12;F5;""),
ensuite: =SI(E1=M12;F6;"") etc.. Ceci fonctionne si les 2 dates
concordent. Le problème est que le lendemain, si E1=M12, les valeurs
égales à E1=M11 s'effacent.

Ma question no 1: est-il possible, à l'intérieur d'une ligne de
commande (genre: =si...) d'insérer une ligne de macro qui viendrait
coller les valeurs ("selection.pastespecial paste...) Pour toutes
sortes de raisons, (surtout la compatibilité entre versions de
logiciel, et aussi le fait que je ne suis pas le seul utilisateur du
fichier - donc si ça plante... ) je n'aimerais pas être obligé de
créer une macro pour faire effectuer cette opération.

Ma question no 2: SVP , pourriez-vous me construire la macro en
question. Merci.

Robert, de la Beauce, au Québec