Tableau Excel - verrouiller cellule - calcul auto

Salut à tous,

Petit souci de syntaxe sur une formule positionné dans un tableau excel (création automatique). C'est la première fois que je m'intéresse à cette fonctionnalité, j'ai vu un tuto qui disait que s'était important d'utiliser ces tableaux ^^.

Mais j'aimerai savoir comment verrouiller une cellule, en effet quand je copie vers la droite ma fonction les références, surlignées dans la formule suivante, changes :

=SOMME.SI.ENS(Tableau5[[#Tout];[Montant]];Tableau5[[#Tout];[Annee]];ANNEE([@Mois]);Tableau5[[#Tout];[Mois]];MOIS([@Mois]);Tableau5[[#Tout];[Poste]];Tableau7[[#En-têtes];[Courses]

J'aimerai faire en sorte que cela fasse comme les $$.

EDIT :

Autres problèmes, la formule ne prend pas en compte les valeurs tant que je ne les ai pas valider en cliquant sur la cellule et appuyé sur entrée. Les valeurs sont inscrites dans une feuille et elles sont renseignées avec une macro (userform).

Merci d'avance.

Cdlt,

BOnjour

Voir ici toutes les méthodes pour verrouiller l'adressage dans les tableaux http://www.excel-formations.fr/Trucs_astuces/Tableaux01.php

Pour ta seconde question : tant qu'une formule est en mode édition, Excel ne fait rien... Sans voir ton code difficile de savoir ce qui se passe

Re,

Merci pour ta réponse, je te met le code et le fichier comme ça ! C'juste que je voulais chercher un peu mais j'ai rien trouvé.

Private Sub Ajouter_Click()
Dim i As Integer
i = 2
Dim tot As Integer
tot = Val(TextBox1.Value) + Val(TextBox2.Value) + Val(TextBox4.Value) + Val(TextBox5.Value) + Val(TextBox6.Value) + Val(TextBox7.Value)

While Worksheets("Dépenses").Range("A" & i).Value <> ""
i = i + 1
Wend

If TextBox1.Value <> "" Then
Range("A" & i).Value = Year(Now())
Range("A" & i).NumberFormat = "General"
Range("B" & i).Value = Month(Now())
Range("B" & i).NumberFormat = "General"
Range("C" & i).Value = "Courses"
Range("D" & i).Value = Format(Val(TextBox1.Value), "# ##0.00 €")
i = i + 1
End If
If TextBox2.Value <> "" Then
Range("A" & i).Value = Year(Now())
Range("A" & i).NumberFormat = "General"
Range("B" & i).Value = Month(Now())
Range("B" & i).Value = Month(Now())
Range("B" & i).NumberFormat = "General"
Range("C" & i).Value = "Quotidien"
Range("D" & i).Value = Format(Val(TextBox2.Value), "# ##0.00 €")
i = i + 1
End If
If TextBox4.Value <> "" Then
Range("A" & i).Value = Year(Now())
Range("A" & i).NumberFormat = "General"
Range("B" & i).Value = Month(Now())
Range("B" & i).NumberFormat = "General"
Range("C" & i).Value = "Logement"
Range("D" & i).Value = Format(Val(TextBox4.Value), "# ##0.00 €")
i = i + 1
End If
If TextBox5.Value <> "" Then
Range("A" & i).Value = Year(Now())
Range("A" & i).NumberFormat = "General"
Range("B" & i).Value = Month(Now())
Range("B" & i).NumberFormat = "General"
Range("C" & i).Value = "Véhicule"
Range("D" & i).Value = Format(Val(TextBox5.Value), "# ##0.00 €")
i = i + 1
End If
If TextBox2.Value <> "" Then
Range("A" & i).Value = Year(Now())
Range("A" & i).NumberFormat = "General"
Range("B" & i).Value = Month(Now())
Range("B" & i).NumberFormat = "General"
Range("C" & i).Value = "Loisirs"
Range("D" & i).Value = Format(Val(TextBox6.Value), "# ##0.00 €")
i = i + 1
End If
If TextBox2.Value <> "" Then
Range("A" & i).Value = Year(Now())
Range("A" & i).NumberFormat = "General"
Range("B" & i).Value = Month(Now())
Range("B" & i).NumberFormat = "General"
Range("C" & i).Value = "Autres"
Range("D" & i).Value = Format(Val(TextBox7.Value), "# ##0.00 €")
i = i + 1
End If
i = i - 1
Range("E" & i).Value = Format(tot, "# ##0.00 €")
Unload Me
End Sub

Feuille "Dépenses" il y'a un userform et tout et tout ^^.

J'ai essayé de mettre un format, j'ai lu quelque part que sa pouvait être ca mais non .. Il faut nécessairement que je click sur la cellule et que je valide la valeur pour qu'elle soit prise en compte dans la feuille "mois".

7bm-xlprat.xlsm (37.77 Ko)

EDIT :

C'est bon j'ai trouvé une solution, il faut multiplier par 1 dans la macro pour qu'il soit pris en compte, comme ceci :

Range("D" & i).Value = Format(Val(TextBox6.Value), "# ##0.00 €") * 1

Merci à toi,

Rechercher des sujets similaires à "tableau verrouiller calcul auto"