XL 2010 Déclique

Robert

XLDnaute Barbatruc

Repose en paix

• 31 Mars 2020

• #2

BonjouR FCMLE, bonjour le forum,

Quelle est la formule contenue dans H63 ? Car si tu cliques tu la perds et si tu décliques il faudrait la remettre...

 

Vote positif 0 Vote négatif

F

FCMLE44

XLDnaute Impliqué

• 31 Mars 2020

• #3

SOMME(H58+H59)
Merci

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 31 Mars 2020

• #4

Bonjour à tous

Manifestement FCLE44, tu es en train de construire un formulaire

Il serait peut-être plus simple de tout poster dans un même fil afin que les réponses soient dans la même logique... sinon soit tu n'avanceras pas soit les bouts de réponse ne pourront se coordonner pour un formulaire efficace...

 

Vote positif 0 Vote négatif

F

FCMLE44

XLDnaute Impliqué

• 31 Mars 2020

• #5

Oui tu as raison mais je fais par étape et les idées me viennent au fil de l'eau Seul ma conversation Import tri et recherche est différent.

j'essaie aussi en recherchant moi même certaines chose de mon côté sans vous solliciter

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 31 Mars 2020

• #6

Bonjour Chris, le fil, le forum,
Essaie comme ça :

VB:

Private Sub CheckBox1_Click()
If InStr(Range("H63").FormulaLocal, "=") <> 0 Then
    Range("H63").FormulaLocal = IIf(CheckBox1.Value = True, "=(H58+H59)*2", "=H58+H59")
End If
End Sub

 

Vote positif 0 Vote négatif

GALOUGALOU

XLDnaute Accro

• 31 Mars 2020

• #7

bonjour fmle44 bonjour le fil bonjour le forum
une proposition
dans le code modifier avec else

Enrichi (BBcode):

 Range("H63").Value = 2 * Range("H63").Value
    Else
  Range("H63").Value = Range("H63").Value / 2

cordialement galougalou

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 31 Mars 2020

• #8

RE,

GALOUGALOU à dit:

bonjour fmle44 bonjour le fil bonjour le forum
une proposition
dans le code modifier avec else

Enrichi (BBcode):

 Range("H63").Value = 2 * Range("H63").Value
    Else
  Range("H63").Value = Range("H63").Value / 2

cordialement galougalou

Cliquez pour agrandir...

Mais il n'y a plus de formule !... Et si tu changes H58 ou H59 ?!...

 

Vote positif 0 Vote négatif

F

FCMLE44

XLDnaute Impliqué

• 31 Mars 2020

• #9

Robert à dit:

Bonjour Chris, le fil, le forum,
Essaie comme ça :

VB:

Private Sub CheckBox1_Click()
If InStr(Range("H63").FormulaLocal, "=") <> 0 Then
    Range("H63").FormulaLocal = IIf(CheckBox1.Value = True, "=(H58+H59)*2", "=H58+H59")
End If
End Sub

Cliquez pour agrandir...

Ca marche. Merci beaucoup
Je continue

 

Vote positif 0 Vote négatif

GALOUGALOU

XLDnaute Accro

• 31 Mars 2020

• #10

re robert
tu as raison je n'ai pas été assez attentif
@+

 

Vote positif 0 Vote négatif