OVH Cloud OVH Cloud

Problème pour Copie de ligne

5 réponses
Avatar
Alba
Bonjour,

Je ne comprends pas tr=E8s bien, alors que je suis arriv=E9e a faire mon
code pour copier une ligne selon choix dans
combox, tout se passe bien, il copie ma ligne avec les formules comme
je le souhaitais, sauf.... dans une colonne !

Une partie de la formule ne s'activera sur cette ligne ajout=E9e que si
j'en ajoute une suivante... et ainsi de suite.

Il doit me manquer un =E9pisode et je ne sais pas lequel ???
Je laisse un fichier joint ce sera plus explicite

Merci

http://cjoint.com/confirm.php?cjoint=3DbmjzgMk1Hq

5 réponses

Avatar
Garette
Bonjour,

Je ne cerne pas complètement le problème, mais les noms définis dans la
formule de le colonne J semblent incomplets.
Et je pense que ça peut venir de là

Par exemple si on fait F5 et qu'on tape les noms : N__Fact. ou
Solde_a_recevoir il selectionne un cellule en moins.

Dans la définition des noms :
Solde_a_recevoir ÞCALER('Compte dentiste'!$E$8;;;NBVAL('Compte
dentiste'!$A$8:$A$65536))
Le probleme c'est que E8 est une cellule vide et masquée.
Soit il faut mettre qq chose dedans soit il faut commencer en E9
ÞCALER('Compte dentiste'!$E$9;;;NBVAL('Compte dentiste'!$A$9:$A$65536))
Avatar
Alba
Merci pour ta réponse Garette, c'est gentil de m'aider.

Décidément les décaler et moi on vivra jamais ensemble ! J'ai
toujours des problèmes avec eux.

Je vais faire des modifications dans la journée comme tu me
l'indiques, et je reviens te dire comment sa se passe.

Merci bonne journée
Avatar
Alba
Ah ouiiiiiiii ! C'était ça Garette j'ai commencé mon Décaler à 9
ce qui est logique puisque 8 est masquée, et ouf !! ma formule me suit
maintenant !
(me rendent chèvre ces décaler !!)

A tout hasard est-ce que tu sais quel code je dois mettre sur mon
bouton "supprimer" dans mon userform pour supprimer une ligne selon le
choix de la combox sans et effacer les formules ??

En tout cas merci beaucoup d'avoir si rapidement trouvé mon problème.
Avatar
Garette
Re,

Pour supprimer une Facture en cliquant sur le bouton SUPPRIMER UNE FACTURE
Voici le code que je propose dans ton contexte :

Private Sub CdbSuppFact_Click()
If CBxNom.ListIndex >= 0 Then
Rows(Range("B9:B50").Offset(CBxNom.ListIndex, 0).Resize(1, 1).Row) _
.Delete Shift:=xlUp
End If
End Sub

Il supprime toute la ligne. A priori pas besoin de garder les formules
puisque tu les remets à chaque fois.
PS - Il faut peut etre gerer des avertissements du genre "Etes vous sur de
vouloir supprimer cette facture .."
Avatar
Alba
Oh c'est trop bien, deux problèmes pulverisés en un rien de
temps...je rêve !!!

oui je vais bien entendu gérer avec des avertissements, c'est plus
prudent.

Merci Garette, c'est super !!!