... Tentative 12 pour envoyer ce message, en esperant que ca fonctionne
(accent enleves) ...
A partir de la feuille de travail actuelle aabbcc, sans acceder à la feuille
de
travail xxyyzz, est-il possible d'afficher, a partir de la feuille de travail
actuelle aabbcc, une boite de message indiquant la selection actuelle de la
feuille de travail xxyyzz, genre un code qui pourrait ressembler a : msgbox
sheets("xxyyzz").selection.address.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacky
Bonsoir,
Je propose ceci '------------------------- Sub jj() Dim nom As String, x As String nom = ActiveSheet.Name With Sheets("xxyyzz") .Activate x = Selection.Address End With Sheets(nom).Select MsgBox "La cellule ou plage active de la feuille xxyyzz est:" & vbLf & x End Sub '--------------------
-- Salutations JJ
"TMQA" a écrit dans le message de news:
Bonjour,
... Tentative 12 pour envoyer ce message, en esperant que ca fonctionne (accent enleves) ...
A partir de la feuille de travail actuelle aabbcc, sans acceder à la feuille de travail xxyyzz, est-il possible d'afficher, a partir de la feuille de travail actuelle aabbcc, une boite de message indiquant la selection actuelle de la feuille de travail xxyyzz, genre un code qui pourrait ressembler a : msgbox sheets("xxyyzz").selection.address.
Merci et bonne journee.
Bonsoir,
Je propose ceci
'-------------------------
Sub jj()
Dim nom As String, x As String
nom = ActiveSheet.Name
With Sheets("xxyyzz")
.Activate
x = Selection.Address
End With
Sheets(nom).Select
MsgBox "La cellule ou plage active de la feuille xxyyzz est:" & vbLf & x
End Sub
'--------------------
--
Salutations
JJ
"TMQA" <TMQA@discussions.microsoft.com> a écrit dans le message de news:
149AB666-F91E-45E4-BD55-480C5CC92556@microsoft.com...
Bonjour,
... Tentative 12 pour envoyer ce message, en esperant que ca fonctionne
(accent enleves) ...
A partir de la feuille de travail actuelle aabbcc, sans acceder à la
feuille
de
travail xxyyzz, est-il possible d'afficher, a partir de la feuille de
travail
actuelle aabbcc, une boite de message indiquant la selection actuelle de
la
feuille de travail xxyyzz, genre un code qui pourrait ressembler a :
msgbox
sheets("xxyyzz").selection.address.
Je propose ceci '------------------------- Sub jj() Dim nom As String, x As String nom = ActiveSheet.Name With Sheets("xxyyzz") .Activate x = Selection.Address End With Sheets(nom).Select MsgBox "La cellule ou plage active de la feuille xxyyzz est:" & vbLf & x End Sub '--------------------
-- Salutations JJ
"TMQA" a écrit dans le message de news:
Bonjour,
... Tentative 12 pour envoyer ce message, en esperant que ca fonctionne (accent enleves) ...
A partir de la feuille de travail actuelle aabbcc, sans acceder à la feuille de travail xxyyzz, est-il possible d'afficher, a partir de la feuille de travail actuelle aabbcc, une boite de message indiquant la selection actuelle de la feuille de travail xxyyzz, genre un code qui pourrait ressembler a : msgbox sheets("xxyyzz").selection.address.