Soucis sur exce

dinamo Messages postés 97 Statut Membre -  
santiago69 Messages postés 485 Statut Membre -
Bonsoir,

serait il possible sur excel de faire une cellule qui se calcul toute seul
par exemple sur la cellule a1 je met 10, puis je remet 10 et que dans la cellule a1 ce 20 etc

merci par avance
Configuration: Windows XP
Internet Explorer 7.0

7 réponses

  1. santiago69 Messages postés 485 Statut Membre 209
     
    non. quand tu saisi une valeur dans une cellule, la valeur precedente est ecrasee et perdue.

    c'est possible en programmation VBA. ca t'interesse ?
    0
  2. dinamo Messages postés 97 Statut Membre
     
    oui cela m interesse
    0
  3. santiago69 Messages postés 485 Statut Membre 209
     
    1) tu cree un classeur Excel avec 2 feuilles
    2) tu vas dans l'interface VBA (Alt+F11)
    3) tu vas dans l'explorateur de projet (Ctrl+R)
    4) Tu selectionne Feuil2 (Feuil2)
    5) tu vas dans la fenetre proprietes (F4)
    6) tu defini les valeurs suivantes :
    (name) = calculator
    Name = calculator
    Visible = 2 - xlSheetVeryHidden
    7) tu retourne dans l'explorateur de projet (Ctrl+R)
    8) double clic sur Feuil1 (Feuil1)
    9) tu saisi le code suivant
    Private Sub Worksheet_Change(ByVal Target As Range)
        Static NoEvent As Boolean
        If NoEvent Then Exit Sub
        NoEvent = True
    
        Dim TempCell As Range
        Set TempCell = calculator.Cells(Target.Row, Target.Column)
        If IsEmpty(Target) Then
            TempCell.ClearContents
        Else
            TempCell = TempCell + Target
            Target = TempCell
        End If
    
        NoEvent = False
    End Sub

    10) ferme l'interface VBA

    Dans ton classeur il n'y a plus qu'une feuille
    Quand tu saisi une valeur dans une cellule, elle s'ajoute a la precedente
    Quand tu supprime la valeur d'une cellule, elle devient vide.

    Qu'en pense tu ?
    0
  4. dinamo Messages postés 97 Statut Membre
     
    merci c bien
    mais le probleme c toute la feuille qui est comme ca je veu juste une colonne
    je sais e suis complique
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. santiago69 Messages postés 485 Statut Membre 209
     
    Alors voila le nouveau code :
    Il faut remplacer la valeur de la constante COL par le numero de la colonne desiree.

    Const COL As Long = 1
    
    Private Sub Worksheet_Change(ByVal Target As Range)
        Static NoEvent As Boolean
        If NoEvent Then Exit Sub
        If Target.Column <> COL Then Exit Sub
        NoEvent = True
    
        Dim TempCell As Range
        Set TempCell = calculator.Cells(Target.Row, Target.Column)
        If IsEmpty(Target) Then
            TempCell.ClearContents
        Else
            TempCell = TempCell + Target
            Target = TempCell
        End If
    
        NoEvent = False
    End Sub
    


    0
  7. dinamo Messages postés 97 Statut Membre
     
    excuse moi encore

    Deja merci ca ma beaucou aider

    mais il y a pas une formule qui peut le faire meme avec une cellule A1 qui a la formule et la cellule B1 ou tu saisis et que la cellule A1 car en memeoire
    0
  8. santiago69 Messages postés 485 Statut Membre 209
     
    j'ai rien compris du tout a la phrase.
    peux tu essayer de reformuler ta question (en anglais ou espagnol si tu prefere) ?

    0