ouverture de feuilles automatique

nouv à dit:

bonsoir,


En théorie quand tu clic sur bouton Extraire, une nouvelle extraction se fait automatiquement en fonction des données feuille 1 !

NON DESOLE RIEN NE SE FAIT AUTOMATIQUEMENT

Pour tes filtres par fournisseurs, etc... il suffit que tu appliques la même méthode que pour les feuilles vendors et destinataire

Qu'appelle tu ?
Menu Données Filtre Filtre automatique ??

><>

Cliquez pour agrandir...

JE NE SAIS PAS CE QUI SE PASSE MAIS JE VIENS D ESSAYER DE RENTRER UN DESTINATAIRE A SAVOIR NW-461 TOUT ALLAIT BIEN QUAND SOUDAIN J AI ENTENDU DES DING DONG

MON CURSEUR BOUGEAIT TOUT SEUL DANS LA FENETTRE DE MON FICHIER EXCEL (enfin de ton fichier)

des fenetre internet s affichaient ...

dis moi c est une blague?

si oui merci d'arrêter s'il te plait

Cliquez pour agrandir...

nouv à dit:

Bonjour,

pour l'erreur sur la feuille 1, escuse moi j'ai oublié de supprimer une formule de test.
Pour les explications je te renvoie le fichier expliqué.
Si tu as besoin de plus d'explication n'hésite pas. Si ce n'est moi, quelqu'un te répondra


à plus
><>

Cliquez pour agrandir...

en ce qui concerne les destinataires, et les fournisseurs y a t'il moyen de faire en sorte de voir les numéro de commandes? tu sais la colonne qui commence par 2200...

Cliquez pour agrandir...

et de m'ajouter un "tableau" qui puisse me dire les commandes qui sont close et qui sont open

Cliquez pour agrandir...

Sub extraction_destinataire()
'
' extraction_vendors Macro

    Range("tableau").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
        "B2:B3"), CopyToRange:=Range("extraction_destinataire"), Unique:=False
End Sub

Sub extraction_[COLOR="Red"]status[/COLOR]()
'
' extraction_[COLOR="Red"]statusMacro[/COLOR]

    Range("tableau").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
        "B2:B3"), CopyToRange:=Range("extraction_[COLOR="Red"]status[/COLOR]"), Unique:=False
End Sub

de faire en sorte également que je sache le nombre de pièces commandées multiplié par le prix unitaire pour savoir quel est le montant qui n'a pas été livré

Cliquez pour agrandir...

nouv à dit:

bonjour julesvernes,

le but d'un forum étant aussi d'apprendre, il y a des choses que tu peux faire toi même il me semble !
le fichier que je t'ai fourni donne des explications pour ce qui t'interresse


1 - oui c'est possible, sur la feuille 2 insère déjà une colonne supplémentaire entre tes tableaux pour avoir de la place
2 - clic dans le premier tableau à modifier. Dans le volet office à droite tu clic sur le champ po# et tu le transporte dans les lignes à gauche (comme montré sur mon explication). Cela te rajoute une colonne avec ton numéro de bon de commande (et également un total qu'il faut supprimer voir 3)
3 - double clic sur le champ gris "Result" et dans sous totaux tu clic sur "aucun"

et tu veux mettre quoi dans le tableau, je suis sensée deviner les colonnes qui t'interresse ?
à mon avis il s'agit d'un filtre élaboré que tu souhaites - pour cela tu as l'explication dans la feuille "par vendors" sur le tableau que je t'ai envoyé.
1 - copie la feuille "par vendors" et renomme là
2 - dans la cellule B2 tu mets le nom de champ qui t'interresse, cela doit être "STATUS"
3 - dans la cellule B3 tu tapes ce qui t'interesse "open" ou "close"
4 - sélectionne de A6 à AH6, tu donnes un nom "extraction_status"
5 - tu ajoutes une macro par copier coller
ALT F11 pour aller dans les macros puis double clic sur module 3
copie la macro suivante :

Code:

Sub extraction_destinataire()
'
' extraction_vendors Macro

    Range("tableau").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
        "B2:B3"), CopyToRange:=Range("extraction_destinataire"), Unique:=False
End Sub

et tu la modifies comme cela

Code:

Sub extraction_[COLOR="Red"]status[/COLOR]()
'
' extraction_[COLOR="Red"]statusMacro[/COLOR]

    Range("tableau").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
        "B2:B3"), CopyToRange:=Range("extraction_[COLOR="Red"]status[/COLOR]"), Unique:=False
End Sub

Enregistre et sort de la fenêtre de VBA
6 - clic droit sur le bouton "lancer l'extraction" + Affecter une macro + sélectionne "extraction_status"

une fois le tableau réalisé, il suffira de rajouter une multiplication !

va y au boulot et dis moi ce qu'il en est


><>
à+

Cliquez pour agrandir...