Résultats de la recherche

Bonjour, etant débutant en VBA, je suis sur que mon code est optimisable (je sais pas si sa existe ce mot) shtbase.Range("C11").Copy shtpda.Range("A1").PasteSpecial shtbase.Range("D11").Copy shtpda.Range("B1").PasteSpecial shtbase.Range("N11").Copy shtpda.Range("C1").PasteSpecial...

Bonjour, je voudrais savoir si c'ete possible d'ameliorer mon code car la ce n'est que une petite partie, j'ai 300 ligne comme sa. Je pense que ce soit possible avec une boucle for (je vois comment faire en C mais pas en VBA :( ) . Si quelqu'un a une idée Merci Sub export() Dim Chemin...

Bonjour, Je souhaite exporté des lignes vers un autre classeur les lignes a exportés sont selectionner grace a des checkbox Une fois que l'on a selectionné les lignes a exporté, on clique sur un bouton et les lignes coché se retrouve dans le nouveau classeur je sais pas si c'est trés clair...

Bonjour, Je voudrais quand je clique sur un bouton, une fenetre s'ouvre pour pouvoir entrer les numéro de lignes a sélectionner ou les selectionner directement en cliquant sur la ligne (si c'est possible de faire) et les exporter sur un autre classeur. Merci

Bonjour, Je voudrais avoir le nombre de mois entre 2 dates j'utilise la fonction : =DATEDIF(U7; U8; "m" ) Cette fonction fonctionne seulement pour 2 dates de cette forme 01/01/2000 Je voudrais savoir si cete possible de faire la même chose avec une date sous forme 01/01/2000 et un moi (par...

Bonjour, Je voudrais savoir si il été possible d'accéléré la vitesse d'éxécution de ce code VBA ?? Merci Select Case MsgBox("Contrôl final ?", vbYesNo + vbQuestion, "Titre de la MsgBox") Case vbYes 'procédure si click sur Oui Dim Chemin As String, Fichier As String Dim wk As Workbook...

Bonjour, Quand j'execute mon code, une l'erreur propriété ou méthode non gérée par cet objet ce produit With ThisWorkbook.Worksheets("Saisie de données MOD") If .CheckBox5.Value = True Or .CheckBox6.Value = True Or .CheckBox1.Value = True Or .CheckBox64.Value = True Or .CheckBox2.Value...

Bonjour, Quand j'execute mon code, une l'erreur propriété ou méthode non gérée par cet objet ce produit erreur 438 With ThisWorkbook.Worksheets("Saisie de données MOD") If .CheckBox5.Value = True Or .CheckBox6.Value = True Or .CheckBox1.Value = True Or .CheckBox64.Value = True Or...

Bonjour, Je voudrais savoir si c'été possible d'améliorer ce code ??? Merci If ThisWorkbook.Worksheets("Saisie de données").CheckBox13.Value = True Then wk.Worksheets("Masque saisie").mac3 = True Else wk.Worksheets("Masque saisie").mac3 = False End If If...

Bonjour, J'ai 2 classeur (A et B), je voudrais que quand je coche une checkbox dans mon classeur A, je clique sur un bouton et mon classeur B s'ouvre avec une checkbox deja coché J'ai réussi a faire sa pour des infos dans des cellules mais pas pour les checkbox voici mon code pour copier...

Bonjour, Je voudrais savoir si ce que je veux faire est possible dans mon classeur 1, feuille 1 j'ai un numéro de commande (qui ce trouve en C1) , en cliquant sur un bouton, je copie la valeur de la cellule C1 dans un autre classeur qui est fermé( classeur 2, feuille 1) qui lui contient aussi...

Bonjour, comment modifier ce code pour récupéré la main, car doevents ne marche pas et je reste bloqué dans la boucle Private Sub CommandButton5_Click() remplir_champ_vide Do While FormulaireOK = False DoEvents ' Donne le contrôle à d'autres processus...

Bonjour, Je voudrais additionner tous mes montants en rouge dans la case perdus, les montant en bleu dans la case commandes et les montants en noir dans la case en attente, ci-joint le fichier pour plus de compréhension. Merci

Bonjour, je voudrais savoir si cete possible de créer un bouton qui permettrai de remonter tout en haut de ma page ??

Bonjour, Voila j'aimerai modifier mon code VBA pour pouvoir choisir mon chemin d'enregistrement et non enregistrer ici : C:\Documents and Settings\peyret\Mes documents\camille\ comment faire ? Dim monfichier, jour As String Dim wk As Workbook Dim ws As Worksheet On Error Resume...

Bonjour, Mon code me permet de sauvegarder mon classeur dans un dossier sous le nom que je souhaite. Mon classeur contient plusieurs feuille J'aimerai pouvoir sauvegarder seulement 1 ou 2 feuilles et si possible en PDF Merci Private Sub CommandButton1_Click() On Error Resume Next...

Bonjour, J'aimerai pouvoir enregistrer une copie de certaine feuille (nom de la feuille défini par la celulle C4) de mon classeur dans un dossier (nom du dossier défini par la celulle G4) . Mon code pour l'instant enregistre mon classeur entier dans le chemin défini que doit-je modifier pour...

Bonjour, Voila mon probleme,j'ai un programme sur excel qui en fonction des paramétres saisie crée des page en mode apercu d'impression J'arrive sans souci a enregistrer en pdf mais sa enregistre ma feuille de saisie et non ma feuille crée, comment faire ? je vous met le code de ma macro...

Sub Impression_INV() Dim ShPageGarde As Worksheet Dim CptLigne As Integer Dim Supprimer As Boolean ThisWorkbook.Unprotect Mdp Application.ScreenUpdating = False On Error Resume Next Application.DisplayAlerts = False...

Bonjour, Ce code me permet d'efface toute les données saisies sur ma feuille(masque saisie), cette feuille je l'est remplacé par un userform et mon code ne marche plus shtMasqueSaisie a mon avi c'est sa a modifier mais je ne sais pas par quoi? Merci Sub Remise_a_zero()...