Discussion :

[Nasky]

Hi there !

J'ai une sheet avec des formules dans certaines cases. Ces formules font référence à d'autres cellules qui sont remplies au fur et à mesure par une macro. Je voudrais que les cellules contenant les formules ne se mettent pas à jour quand la macro remplie les cellules référencées. Est-ce possible ?

Exemple :
A1 est vide et B1 contient "2+$A$1" (donc "2" au départ) et ma macro écrit "5" dans A1, je voudrais que la sheet laisse "2" dans B1 tant que je ne force pas la mise à jour via un .calculate.

Merci.

[casefayere]

Bonsoir,
je pensais à quelque chose comme ça

dans un module

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

public essai as string

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
dim valeur
valeur = Range("b1").value
essai = Range("b1").Formula
Range("b1").ClearContents
range("b1") = valeur
End Sub

et avant ton calculate

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("b1") = essai

J'ai essayé, ça marche

[ouisansdoute]

Bonjour,

Je te propose la mise à jour sur ordre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
    With Application
        .Calculation = xlManual
        .MaxChange = 0.001
    End With
    ActiveWorkbook.PrecisionAsDisplayed = False

Le mise à jour ne se fait pas tant que la demande de calcul n'est pas faite manuellement

[laetitia]

bonjour Nasky casefayere le forum tu peus faire comme cela aussi si j ai compris

Option Explicit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub Macro1()
Application.Calculation = xlManual
  'ton code
 End Sub

remettre le calcul en auto par macro

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub Macro2()
Application.Calculation = xlAutomatic
End Sub

ps bonjour ouisansdoute pas rafraichi