Validation d'une saisie

re,

Comme on fait, soit un retrait soit un crédit (on compte que 4 cellules.)

macro complète :

Sub ValidezSaisie()
    If Application.WorksheetFunction.CountA(Range("saisie")) < 4 Then
        MsgBox ("Données incomplètes !")
        Exit Sub
    End If
        Application.EnableEvents = False
        Application.ScreenUpdating = False
            Range("e20") = Date
            Range("saisie").Copy
        With Sheets("TABLEAUBQ")
            .Range("b65536").End(xlUp)(2).PasteSpecial Paste:=xlPasteValues, Transpose:=True
        End With
    Application.CutCopyMode = False
    Range("saisie").ClearContents
    Range("e17") = Range("TABLEAUBQ!b65536").End(xlUp) + 1 'compteur
    Range("e18").Activate
    Application.EnableEvents = True
End Sub

Claude.

Cher Claude,

3 heures de décallage en +

Je vais essayer la focntion que m'as donné.

#+

Noël

re,

tu as 75 noms définis dans le fichier, tu devrais faire le ménage !

Claude.

Cher Claude,

J'ai essayer la fonction même en remplissant le 4 cellules il me donne l'alerte "données incomplètes"

J'ai lu la fonction je voudrai savoir ("e20") correspond exactement à quoi ainsi que e17 e18

J'ai vu dans la fonction que tu selectionne la feuille "saisie" clearcontent cela veut bien dire que tu effaces toutes les données contenues dans le tableau "saisie"

Je viens de recevoir ton dernier message qui m'informe que j'ai 75 noms et tu me dis de faire le ménage, je veux bien mais tous mes noms sont utilisés. As-tu une solution pour regrouper les noms si tu as la solution je suis preneur mais j'ai bien peur que cela ne marche pas.

Mais je te fais confiance je pourrai essayer sur une copie.

Merci

Amicalment

Noël

re,

J'ai lu la fonction je voudrai savoir ("e20") correspond exactement à quoi ainsi que e17 e18

e17 = N° chèque

e18 = Ordre

e20 = la date

adresse cellules du fichier que je t'ai renvoyé.

pour les 75 noms, il y a surement quelque chose à faire.

tous les noms : date_13; date_14; etc.... ??

mais pour çà, il faudrait voir avec le fichier complet.

(un fichier bien construit ne devrait pas avoir + d'une douzaine de noms). à mon avis !

Claude.

édit : n'oublie pas de nommer la plage de saisie "saisie"

Mon cher Claude,

Merci l'information pour les "e" Eh oui effectivement je l'avais oublié ce fichier je comprend mieux mais j'ai travaillé sur mon fichier directement c'est pour cela que je te posais la question autant pour moi.

Pour les 75 noms je ne saurai faire bien sure je pourrai t'envoyer mon fichier mais il fait 2,5 M°.

Comme j'ai pas de zippeur pour Mac il m'est impossible de le zippeMac fourni dans son systèmes un zippeur mais qui ne compresse qu'à 50%

Sinon j'ai un serveur que je peux éventuellement le mettre dessus pour que tu puisses récupérer.

A te lire

Noël

re,

Noel,

Autre remarque, si tu permets.

déjà, quand un fichier pèse + 500Ko, il faut se poser des questions

1- est-ce-que mon fichier vaut autant ? (500K c'est déjà un beau fichier !)

2 - chercher pourquoi il est si lourd. et faire le ménage.

Dans ton cas, par exemple :

nom : nbre_ligne_2 ----> =SI(ET(JOUR(date_2)=1;MOIS(date_2)=1);durée_2;durée_2+1)

nom : nbre_ligne_3 .............

etc.... jusqu'à nbre_ligne_20

On doit pouvoir faire autrement ! !

Nommer des adresses, c'est bien mais pas toujours nécessaire.

Et essaye de travailler sur un seul fichier à la fois.

pour info : mon + gros fichier pèse 1100 Ko avec une base de 4500 lignes sur 23 colonnes. (et 5 ou 6 modules bien remplis)

Voilà ce que je peux te conseiller.

Amicalement

Claude.

Merci Claude,

Comme tu sais ça fait à peine un mois que suis Forum. J pense que j'ai pas mal progressé. J'ai encore beaucoup de progrès à faire.

Je compte sur toi, sur Dan, Sur Marguetlolo, sur Eric sur Myta et les autres que je ne pourrai jamais les énumérés tous.

Pour l'instant mon fichier peut tourner sans trop de difficulté.

Et puis je l'améliorerai au fur à mesure que j'avancerai dans la programmation.

En tout cas je vous dis merci à tous

@++

Noël

re,

Tu ne dis pas si la macro fonctionne et si le problème "validation d'une saisie" est réglé !

Claude.

Bonjour Claude et à tous,

Pour le moment j'ai pas encore essayé je n'ai pas eu le temps de le faire aussitôt que possible je t'informerai.

Merci

@+

Cordialement

Noël

Bonjour à tous,

Claude j'ai essayé la macro Valider_saisie ça marche

Merci beaucoup

Amicalment

Noël