IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

mon affichage ecrase les anciennes valeurs!


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Femme Profil pro
    Étudiant
    Inscrit en
    Août 2016
    Messages
    12
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Maroc

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Transports

    Informations forums :
    Inscription : Août 2016
    Messages : 12
    Par défaut mon affichage ecrase les anciennes valeurs!
    bonjour!
    svp lorsque je fais un msg box !il m affiche tous les resultas que je veux ! mais le probleme c'est que j'ai les instructions qui sont faites par bloc !
    alors lorsqu'il passe aux autres iteratiions au lieu de les afficher dans le 2eme bloc ,il reste sur le 1er et il ecrase toute valeurs deja trouvé dans cette cellule !
    Nom : aaaaaaa.PNG
Affichages : 221
Taille : 11,9 KoNom : bbbbbbbbbbbbbb.PNG
Affichages : 177
Taille : 6,1 Ko

    voila le code !
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    Sub test()
     
    Dim nbl, nbc As Long
    nbl = Feuil2.Range("B3").End(xlDown).Row - 3
    nbc = Feuil2.Range("C2").End(xlToRight).Column - 2
     
    For k = 0 To nbc - 1 'colonne  parcouru c_i
     
    For j = 0 To nbl - 1 'ligne fixé a_j
     
    For i = 0 To nbl - 1 'ligne variable a_i
     
    If i <> j Then
     
    If Feuil2.Cells(i + 3, k + 3) > Feuil2.Cells(j + 3, k + 3) Then
     
    Feuil5.Cells(i + 2, k + 3).Value = Feuil2.Cells(i + 3, k + 3) - Feuil2.Cells(j + 3, k + 3)
     
    End If
     
    End If
     
    Next i
      Next j
    Next k
     
    End Sub
    Nom : ccccccccccccccccccccccccccccccccccccc.PNG
Affichages : 149
Taille : 7,6 Ko

  2. #2
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Ta question n'est pas compréhensible.
    Tu devrais la reformuler.

Discussions similaires

  1. formulaire garde les anciennes valeurs
    Par psycho_xn dans le forum JSF
    Réponses: 11
    Dernier message: 15/09/2008, 18h32
  2. Réponses: 1
    Dernier message: 08/06/2007, 09h12
  3. [2005] Ecraser les anciennes sauvegardes
    Par mister3957 dans le forum MS SQL Server
    Réponses: 4
    Dernier message: 23/02/2007, 17h00
  4. Historiser des modifications et les anciennes valeurs
    Par el_quincho dans le forum Access
    Réponses: 4
    Dernier message: 29/05/2006, 16h49

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo