Résultats de la recherche

Bonjour Pour mettre fin à une discussion autour de dictionnary » je vous adresse le fichier qui reprend tout ce qui a été écrit. Le code est sobre et très élégant. Vous pouvez donc remercier notre ami "ma pomme" Sans oublier patricktoulon et les questions de Fronck xlDnaute junior Je crois...

Bonjour à tous, je suis l’hérétique de service, J’ai créé un dictionnaire avec doublons ! Je souhaite à partir de ce dictionnaire créer un dictionnaire sans doublon C’est pour le fun je sais le créer à partir d’une plage Donc voici le code qui ne fonctionne pas Sub nefonctionnepas() ' For...

excel 365 Bonjour à tous Je clique sur le pictogramme "ouvrir" cela me renvoie vers Ouvrir dans le fichier puis je clique sur parcourir , j'ai la main sur le dossier par défaut Or je souhaite lorsque je clique sur le pictogramme atteindre directement le dossier par défaut A noter Dans...

Bonsoir, Je vous remercie par avance de bien vouloir me corriger. Aucun de ces 2 codes fonctionnent MsgBox Evaluate("=SUMPRODUCT(N(Plage1<=""" & f & """)*(Plage1 >= """ & d & """) ) ") ou MsgBox Evaluate("=SUMPRODUCT(N(" & Plage1 & "<=""" & f & """)*(" & Plage1 & " >= """ & d & """) ) ") Je...

Bonjour à vous, Je fais des gammes et j'essaie de comprendre. Dans l'exemple sub test 1 Avec ce code : tablo = Application.Index(x, 0) Je transpose la plage sans avoir besoin d'utiliser une boucle (exemple test2) Je ne comprends pas le déroulé ==>...

Bonjour J’ai un bug que je n’arrive pas à résoudre – erreur d’exécution ‘13’, incompatibilité de type Test5 avec cette ligne de code Range("E1").Resize(UBound(tablo, 1), UBound(aa, 2)) = application.Transpose(Application.Transpose(tablo)) Test6 avec cette ligne de code...

Bonjour, Je cherche à charger un dictionnaire à partir d’un tableau. Mon code ne fonctionne pas Sub chargtDictionnaire2() Set Mondico = Nothing t2 = Range("tableau2") For i = 1 To UBound(t2, 1) ' je charge le dico y compris les doublons Clé = t2(i...

Bonjour à tous, Formater une plage pour obtenir une notation 1/40 ... par exemple J’ai écrit 5 tests 1/ Je souhaite utiliser une variable pour formater une plage avec le test 4 test 4 x = " /40" Range("d3:d7").NumberFormat = "# ##0.00#" & x Ce code n’est pas bon ! 2/ Mon test 2...

Bonjour à tous Le test1 fonctionne . Sub test1() MsgBox Evaluate("=SUMPRODUCT((c7:c19 = g7)*(d7:d19) ) ") End Sub 2/ le test2 ne fonctionne pas Je souhaiterais remplacer les termes par des variables Sub test2() Dim plage1 As Range, plage2 As Range, y$...

Bonjour à vous Je voudrais servir le tag d’une texbox, j’ai essayé succesivement les codes suivants, aucun ne convient. Private Sub CommandButton1_initialize() Userform1.textbox1.tag=”bonjour” End Sub Private Sub CommandButton1_Click() Userform1.textbox1.tag=”bonjour” Unload Me...

Bonjour à vous, Avec la fonction Find, pour effectuer un choix. fichier joint. 1/ Comment sélectionner successivement tous les noms d’une plage commençant par deux caractères. Je n’ai trouvé que cette astuce, utiliser une colonne supplémentaire. Afin d’éviter de sélectionner une...

Bonjour à tous, J'utilise ce code pour neutraliser 3 touches lors du servi du textbox Private Sub TextBox4_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) If KeyCode = 8 Or KeyCode = 27 Or KeyCode = 46 Then...

Pour une veille des fêtes ! Bref, bonjour à vous, Je sollicite votre aide. En cliquant sur la croix au-dessus du ruban à gauche on trouve les icones : « restaurer » – «réduire» – « fermer» Je souhaite trouver un code pour désactiver et bien évidemment pour réactiver « Restaurer »...

Bonsoir à vous, Je n’arrive pas à trouver mon erreur. Je devrais obtenir successivement : A1234-D1 puis A1234-D2 puis A1234-D3 puis A1234-D4 puis A1234-D5 Or j’obtiens A1234-D1 puis A2234-D2 puis A3334-D3 puis A4444-D4 puis A5555-D5 Code utilisé Sub test() Dim...

Bonjour à vous, Sous Excel 2010 pour être utilisé par office 2011 pour Mac, j'ai créé un code 1/Fichier A sauvegardé dans un autre répertoire sous le nom de fichier B. fonctionne 2/Je veux rouvrir le Fichier A et fermer le fichier B. ne fonctionne pas Mon problème Office 2011...

Avec excel 2010 j'ai créé une appli qui fonctionne sous office 2011 pour mac. Toutefois j'ai un problème pour sauvegarder sous en vba. Pour comprendre comment fonctionne Mac avec office 2011, j’ai demandé à mon correspondant de créer un répertoire « Facture » et y placer le fichier...

Bonjour à vous, En préambule : Seven 64 / msoffice 2010 à jour donc excel 2010 me fait des blagues ! En E8 ou en G8 somme (e9:e13) ou (I9:I13) donne un résultat erroné, à priori seuls e9 et e12 sont pris en compte à priori seuls g9 et 912 sont pris en compte En I8 résultat...

Bonjour à vous, En préambule : Seven 64 / msoffice 2010 à jour donc excel 2010 me fait des blagues ! En E8 ou en G8 somme (e9:e13) ou (I9:I13) donne un résultat erroné, à priori seuls e9 et e12 sont pris en compte à priori seuls g9 et 912 sont pris en compte...

Bonsoir, 2 tableaux indépendants séparés par plusieurs colonnes. L’option « filtrer » sur un tableau affecte l’autre.. "Filtrer" agit sur toute la ligne d'une feuille. Comment obtenir que le filtre agisse : uniquement sur les lignes du...

Bonjour, Dans l’exemple joint, je souhaiterais pouvoir utiliser une variable. Auriez-vous une astuce ? MsgBox Evaluate("=sumproduct((nom = A1)*(résultat))") 1 - Comment utiliser une variable Var pour indiquer les références cellule (var=a1) 2 - Mieux, utiliser...