OVH Cloud OVH Cloud

Activecell sur une autre feuille

5 réponses
Avatar
Didier NOVARIN
Bonsoir,
J'essaie d'avoir quelque chose comme cela :

With Sheets("Travail")
ActiveCell.Offset(0, 38).Value =
Sheets("Fiche").Range("Fiche_examen_du_projet").Value
End With

Je vous remercie
Didier

5 réponses

Avatar
Fredo P.
Bonjour
Si c'est un oubli, Le point lui, ne doit pas l'être.
"Didier NOVARIN" a écrit dans le message de
news:
Bonsoir,
J'essaie d'avoir quelque chose comme cela :

With Sheets("Travail")

. ActiveCell.Offset(0, 38).Value Sheets("Fiche").Range("Fiche_examen_du_projet").Value
End With

Je vous remercie
Didier




Avatar
Didier NOVARIN
Bonjour Fredo P
Merci beaucoup
Bonne journée
Didier

"Fredo P." a écrit dans le message de news:

Bonjour
Si c'est un oubli, Le point lui, ne doit pas l'être.
"Didier NOVARIN" a écrit dans le message de
news:
Bonsoir,
J'essaie d'avoir quelque chose comme cela :

With Sheets("Travail")

. ActiveCell.Offset(0, 38).Value > Sheets("Fiche").Range("Fiche_examen_du_projet").Value
End With

Je vous remercie
Didier








Avatar
Didier NOVARIN
Désolé...
Cela ne fonctionne pas
Cela plante

With Sheets("Travail")
.Range("AL" & ActiveCell.Row & ":AZ" & ActiveCell.Row).ClearContents
.ActiveCell.Offset(0, 37).NumberFormat = "@"
.ActiveCell.Offset(0, 37).Value = Range("Fiche_examen_du_projet").Value
end with

"Fredo P." a écrit dans le message de news:

Bonjour
Si c'est un oubli, Le point lui, ne doit pas l'être.
"Didier NOVARIN" a écrit dans le message de
news:
Bonsoir,
J'essaie d'avoir quelque chose comme cela :

With Sheets("Travail")

. ActiveCell.Offset(0, 38).Value > Sheets("Fiche").Range("Fiche_examen_du_projet").Value
End With

Je vous remercie
Didier








Avatar
AV
With Sheets("Travail")
.Range("AL" & ActiveCell


Cette syntaxe est vouée à l'échec...
Regarde la propiété ActiveCell dans l'aide et les objets qui peuvent aller avec
:
application ou activewindow...

A voir ce que tu veux faire et en fonction, la sélection prélable de la feuille
peut arranger ton affaire..

AV

Avatar
Didier NOVARIN
Bonjour VA
Je te remercie beaucoup, je contourne le pb
Bonne journée
Didier

"AV" a écrit dans le message de news:

With Sheets("Travail")
.Range("AL" & ActiveCell


Cette syntaxe est vouée à l'échec...
Regarde la propiété ActiveCell dans l'aide et les objets qui peuvent aller
avec :
application ou activewindow...

A voir ce que tu veux faire et en fonction, la sélection prélable de la
feuille peut arranger ton affaire..

AV