| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 04/04/2022 à 15:53 | totoche31 | Creer une boucle | Merci bcp, je vais demander sur le forum... |
| 03/04/2022 à 12:12 | totoche31 | Creer une boucle | C'est impec... Super rapide en plus Juste une precision SVP, les données en CMD_Globale ne se trouvent pas dans une feuille , mais dans un classeur distant du coup With Sheets("CMD_Globale") , il me faudrait SVP With CMD_Globale.csv.. je ne connais pas la syntaxe poour dire que c'est un fichier et n... |
| 03/04/2022 à 10:43 | totoche31 | Creer une boucle | Je dois creer une boucle qui execute cette tache Sheets("CMD_Globale").Select Cells(Numero_de_ligne, 2) = "FR Suivi 20 Eco Jack" Numero_de_ligne = les valeurs qui se trouvent a partir de F2 de l'onglet DS_SHIP Qui peut m'aider SVP ? Le fichier contient 30 000 lignes en A Exemple joint... |
| 31/03/2022 à 20:50 | totoche31 | Syntaxe Cell correcte | Magnifique !! merci bcp... |
| 31/03/2022 à 20:25 | totoche31 | Syntaxe Cell correcte | Je voudrais utiliser cette fonction mais j'ai des soucis dans son formatage Numero_de_ligne = Sheets("DS_SHIP").Range("F2").Value Cells(Numero_de_ligne, 73) = "[Modele Cloture V4.xlsm]DS_SHIP!C2" En resultat j'ai [Modele Cloture V4.xlsm]DS_SHIP!C2 Modele Cloture V4.xlsm, est un autre... |
| 31/03/2022 à 20:19 | totoche31 | Recherche Texte | Je vais essayer d'adapter , merci bcp... |
| 29/03/2022 à 15:35 | totoche31 | Recherche Texte | J'utilise cette macro pour cherche un mot et supprimer ligne Dim C As Range Do Set C = Columns(2).Find("TPU C 0121-B", , , xlWhole) If C Is Nothing Then Exit Sub C.EntireRow.Delete Loop A la place de mettre la valeur littérale "TPU C 0121-B", est il possible de renvoyer sur la valeur d'une cellule p... |
| 11/03/2022 à 10:39 | totoche31 | Critère de recherche | C'est parfait , merci de ton aide..... |
| 11/03/2022 à 10:33 | totoche31 | Critère de recherche | Reponse a moi meme... Selection.AutoFilter Field:=34, Criteria1:=">" & Range("CB1").Value, Operator:=xlAnd, Criteria2:="<" & Range("CC1").Value Merci Moi... |
| 11/03/2022 à 10:25 | totoche31 | Concatener si valeur en doubel | Merci bcp , je vais essayer d'adapté... |
| 11/03/2022 à 10:21 | totoche31 | Critère de recherche | J'utilise cette formule pour filtrer les valeurs superieure au contenu de la cellule CB1 Selection.AutoFilter Field:=34, Criteria1:=">" & Range("CB1").Value, Operator:=xlAnd Comment y rajouter de filtrer aussi les valeurs inferieure a CB2 ? MErc... |
| 01/03/2022 à 17:41 | totoche31 | Concatener si valeur en doubel | Merci cela ressemble exactement a ce que je recherche... Cependant aucune connaissance en Power Query... donc pour l'adapter a mon cas.. ca va pas etre simple... En VBA.. ca me serait plus simple...Un grand Merci tout de meme... |
| 01/03/2022 à 17:09 | totoche31 | Concatener si valeur en doubel | Dans le cadre de ma gestion de stock Est il possible de concatener 2 cellule (En B) si le numero de commande (en A) est le meme ? et supprimer la ligne commande en double Exemple joint Merci... |
| 19/02/2022 à 10:09 | totoche31 | Surligner des lignes si cellule colonne vide | C'est Impec, Merci Bcp... |
| 19/02/2022 à 09:16 | totoche31 | Application.GetOpenFilename avec filtre sur nom de fichier | Bingo, ca marche Merci... |
| 17/02/2022 à 20:08 | totoche31 | Application.GetOpenFilename avec filtre sur nom de fichier | Merci bcp cela fonctionne, mais je bloque a la suite, voici mon code adaptée Dim fd As FileDialog Dim FileName As String Set fd = Application.FileDialog(msoFileDialogFilePicker) With fd .Filters.Clear .Filters.Add "Fichiers Texte", "*.csv" .Title = "Sélectionnez le document" .InitialFileName = "C:\U... |
| 17/02/2022 à 08:17 | totoche31 | Surligner des lignes si cellule colonne vide | Effectivement cette formule fonctionne pour tester les cellules =ET($D2="";$E2<>"DS-JACK";$E2<>"EES") En fonction du résultat Vrai ou Faux, j'utilise le gestionnaire de conditions pour Colorer les cellules, jusque là tout va bien. Cependant, cela ne semble pas dynamique, si une valeur ch... |
| 17/02/2022 à 07:32 | totoche31 | Application.GetOpenFilename avec filtre sur nom de fichier | J'utilise cette fonction pour importer mon fichier de commande ChDir "D:\Telechargement" Dim F As Variant F = Application.GetOpenFilename("csv Files (order*.csv), order.csv") Est il possible de filtrer le nom du fichier , je souhaiterai que n'apparaissent que les fichiers commençant par order* Merci... |
| 15/02/2022 à 15:23 | totoche31 | Surligner des lignes si cellule colonne vide | Perfecto... |
| 15/02/2022 à 12:07 | totoche31 | Surligner des lignes si cellule colonne vide | Je souhaiterai remplir en bleu une ligne (de A a E) si la cellule de la colonne D est vide, a condition que la colonne E , il n'y a pas DS-JACK ou EES. Est ce possible ? MErci... |
| 15/02/2022 à 07:26 | totoche31 | Fermer Word depuis Excel en VBA | Voila une operation rondement mené Impeccable, Merci beaucoup... |
| 11/02/2022 à 07:41 | totoche31 | Fermer Word depuis Excel en VBA | Merci de la réponse. Mais peut être je n'ai pas été assez clair, Si on ferme le document Word , ca ne pose pas de problème au contraire. c'est le but recherché... |
| 10/02/2022 à 11:38 | totoche31 | Fermer Word depuis Excel en VBA | J'utilise ce code depuis Excel pour lancer un publipostage sur Word.. cela fonctionne parfaitement Sub Etiquettes_SAV() ' Publipostage Set wordapp = CreateObject("word.Application") wordapp.Visible = True wordapp.Documents.Open "D:\Dropbox\Chris\Dropbox\5) Envoi - SAV\Suivi Envoi\7 - SAV-Publipostag... |
| 03/02/2022 à 20:32 | totoche31 | Arrondir en fonction d'une valeur | C'est Parfait , merci BCP... |
| 03/02/2022 à 19:55 | totoche31 | Arrondir en fonction d'une valeur | Je souhaiterai arrondir des valeurs de poids J'ai 3 tranches, possible d'avoir une macro exécutant cette tache SVP ? Poids Valeur a retenir Tranche 1 0-24 20 Tranche 2 25-55 50 Tranche 3 56-120 100... |
| 25/01/2022 à 18:51 | totoche31 | Incrementer de 1 par lots de commande | Impecable !!!... |
| 25/01/2022 à 08:42 | totoche31 | Incrementer de 1 par lots de commande | Effectivement , je rajoute bien les nouvelles commandes, et le resultat est different voici mon fichier... |
| 25/01/2022 à 07:49 | totoche31 | Incrementer de 1 par lots de commande | Merci de ta réponse De mon cote ca me donne cela comme résultat. une idée ?, je n'ai pas de message d'erreur , la macro s'execute sans souci... |
| 24/01/2022 à 17:33 | totoche31 | Incrementer de 1 par lots de commande | En colonne A je reçois (d'une autre macro) chaque jours ou plusieurs fois par jour des numéros de commande. (id) En B, j'aimerai que le numéro de session s'incrémente de 1 chaque fois que je reçois des lots de commandes (dans une session de commande le nombre de celle ci est aléatoire), on incrément... |
| 21/01/2022 à 17:17 | totoche31 | Supprimer ligne en cas de doublon avec condition | Je souhaiterai une macro, qui puisse supprimer une ligne entière, si la colonne A contient un doublon , et je garde la ligne qui contient le mot shipped en colonne B. Fichier d'environ 10000 Lignes et 50 colonnes... |
| 21/01/2022 à 10:39 | totoche31 | Suppression ligne si doublon | Difficile de poster ici , il y a des infos de clients ... je peux l'envoyer en Mp..... |
| 21/01/2022 à 10:29 | totoche31 | Suppression ligne si doublon | Un fichier avec 10 000 Lignes et 50 colonnes ... C'est aléatoire en fait, je viens de voir que de temps en temps ca s'exécute bien et d'autres fois j'ai le message d'erreur... |
| 21/01/2022 à 09:59 | totoche31 | Suppression ligne si doublon | Merci a vous 2 , j'ai opté pour l'option de Jean Eric, plus facile a adapter en VBA pour Moi Cepedant , je rencontre un souci, quand je copie mes données dans le fichier exemple et que je lance la macro ca fonctionne au top. Par contre quand je recupere la macro et que je l'exécute dans mon fichier... |
| 20/01/2022 à 20:38 | totoche31 | Suppression ligne si doublon | En colonne B, il ne peut y avoir que 2 états, Shipped ou to_be_prepared. Que doit-on faire, en présence de doublons mais sans le mot "shipped" en colonne B ? on supprime la ligne... |
| 20/01/2022 à 20:12 | totoche31 | Suppression ligne si doublon | Je souhaiterai une macro, qui puisse supprimer une ligne entière, si la colonne A contient un doublon , et je garde celle qui contient le mot shipped en colonne B. Merci de votre aide Exemple joint... |
| 03/12/2021 à 16:42 | totoche31 | Code pour supprimer des mots dans une cellule texte | Merci effectivement cela fonctionne Mais le besoin se confirme plus précisément. Est il possible par exemple si le nombre de Caractères en A1 est Supérieur a 80 de supprimer un mot , par exemple le mot "voiture" ... |
| 01/12/2021 à 20:10 | totoche31 | Code pour supprimer des mots dans une cellule texte | Ben oui, j'ai bien sur ouvert le document, modifier le contenu de la cellule A1... Mais j'ai pas vu de changement... Desolé... |
| 01/12/2021 à 16:55 | totoche31 | Code pour supprimer des mots dans une cellule texte | Merci pour cela ... Cependant, désolé pour ma méconnaissance, j'ai bien vu le code. Mais, Il n'y a pas de macro attaché pour exécuter le code ? Ou cela s'exécute tout seul ? fonction du contenu de la cellule.. je dois loouper quelque chose Merci bcp... |
| 30/11/2021 à 17:39 | totoche31 | Code pour supprimer des mots dans une cellule texte | Je voudrais savoir s'il possible de supprimer un mot dans une cellule texte, si par exemple, le nombre de caractère est supérieure a 52 , supprimer le mot Bleu En B1 le nombre de caractere , en A1 la phrase Exemple Joint Merci... |
| 23/11/2021 à 13:00 | totoche31 | Vitesse d'insertion de ligne vide | Pour le premier Cas , je cherche a inserer des lignes vides et non pas en copier certaines Merci... |
| 23/11/2021 à 12:52 | totoche31 | Vitesse d'insertion de ligne vide | Merci bcp, j'ai un message d'erreur a l'exécution de cette ligne .Range("A1:A2").AutoFill Destination:=.Range("A1:A" & dl), Type:=xlFillDefault Le colonne s'insere bien , A1 = 1, A2 =2, puis erreur lors de la duplication des lignes vers le bas En colonne 3, j'ai une vingtaine de valeurs MErco... |
| 23/11/2021 à 11:11 | totoche31 | Vitesse d'insertion de ligne vide | J'utilise cette macro pour insérer des lignes vides, cela fonctionne super , le souci c'est que pour des fichiers contenant plus de Mille lignes , c'est très long est il possible d'accélérer cela ? For i = Ligne_Depart + 2 To N_b_lignes Step N_b_couleurs + 1 Rows(i).EntireRow.Insert , CopyOrigin:=xl... |
| 23/11/2021 à 11:07 | totoche31 | Copie avec incrementation | Super TOP... |
| 17/11/2021 à 11:53 | totoche31 | Copie avec incrementation | Une solution qui fonctionne top... |
| 17/11/2021 à 08:13 | totoche31 | Copie avec incrementation | Est il possible d'obtenir le résultat en B2:B28 tel que mon exemple joint SVP ? En C1, j'ai le nombre d'occurrence a répéter, dans notre cas 8 En B3 Copier vers le bas 8 fois (La valeur de A2), en B11 rien, en B12 Copier 8 fois (La valeur de A12), rien en B20 , ainsi de suite. Macro ou VBA sont les... |
| 10/11/2021 à 17:21 | totoche31 | Inserer une cellule vides tous les Y Colonnes | Bonsoir , grâce a vous , j'utilise ce code qui fonctionne a merveille For i = Ligne_Depart To N_b_lignes Step N_b_couleurs + 1 Rows(i).EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove Ce code m'insère une ligne vide toutes les N_b_couleurs + 1.. parfait Le besoin évolue, au lieu d'insérer une... |
| 09/11/2021 à 18:55 | totoche31 | Selection.AutoFill avec variable | C'est parfait , Merci bcp encore une fois , problème resolu... |
| 09/11/2021 à 17:57 | totoche31 | Selection.AutoFill avec variable | J'utilise très souvent cette fonction, cependant fonction du nombre de ligne , le traitement devient de plus en plus long Selection.AutoFill Destination:=Rows("3:299"), Type:=xlFillDefault J'ai une variable qui récupère la valeur 299 , comment l'intégrer dans le code SVP ... |
| 07/11/2021 à 15:10 | totoche31 | Boucle pour écrire une valeur toutes les X lignes | Ca marche TOP... |
| 07/11/2021 à 12:40 | totoche31 | Boucle pour écrire une valeur toutes les X lignes | For i = 8 To N_b_lignes Step N_b_couleurs + 1 Rows(i).EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove Next Bonjour , j'utilise ce code qui fonctionne très bien pour insérer une lignes vides toutes les N_b_couleurs, j'aimerai a l'aide du meme type de code, si possible, écrire dans une cellule... |