Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel fonction dans une cellule

fonction dans une cellule

1 réponse
Avatar
charles
je d=E9bute et je voudrais faire la chose suivante:

saisir une date dans une cellule (=E7a j'y arrive), puis=20
l'utiliser pour cr=E9er une fonction Si dans une autre=20
cellule situ=E9e sur une autre feuille de travail.

Voici le code:

Dim dateces As Date
Dim v1 As String

dateces =3D Range("c8").Value
v1 =3D "=3DSI($H$1-" & dateces & "<=3D0;c10;0)"
Sheets("port OI1").Range("C12") =3D v1

J'obtiens l'erreur d'execution 1004
"erreur d=E9finie par lapplication ou par l'objet"

Que faire??
Merci.
Signaler un problème avec ce contenu

1 réponse

Supprimer
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
Avatar
FredO
essaye ça :
Sheets(1).Range("C12").Formula = "=IF(($H$1-$C$8)<=0 ,
$C$10 , 0)"

-----Message d'origine-----
je débute et je voudrais faire la chose suivante:

saisir une date dans une cellule (ça j'y arrive), puis
l'utiliser pour créer une fonction Si dans une autre
cellule située sur une autre feuille de travail.

Voici le code:

Dim dateces As Date
Dim v1 As String

dateces = Range("c8").Value
v1 = "=SI($H$1-" & dateces & "<=0;c10;0)"
Sheets("port OI1").Range("C12") = v1

J'obtiens l'erreur d'execution 1004
"erreur définie par lapplication ou par l'objet"

Que faire??
Merci.
.