Contenu récent par Blunet

Re : enregistrer un classeur et ouvrir un autre Salut Blafi faut-il considérer que l'emplacement du fichier à ouvrir est connu d'avance ? Si c'est le cas alors : Workbooks.Open Filename:= _ "Chemin\NomClasseur.xls" Dans le code du Classeur à Fermer, l'exécution de ce...

Re : Selection plage de cellules Salut, Essaye ceci ... ... In Range("A" & MyRow, "IV" & MyRow) ...

Re : Localiser un fichier Salut à tous ma modeste contribution S'il s'agit de garder simplement le chemin du fichier Sub LocaliseFichier() Dim Chemin As String MsgBox "Ce fichier se trouve à cet emplacement : " & _ ActiveWorkbook.Path 'Ou alors Chemin = ThisWorkbook.Path...

Re : variable dans une cellule Salut à tous, un fichier joint permettrait de mieux comprendre...

Re : COMMANDE Sheets avec variable En enlevant les guillement il faut avoir définie la variable auparavant: Variable = "Nom" Sheets(Variable).Select Mais là il est difficile de paramétrer la variable puisqu'il faut la changer à chaque fois. Essaye plutôt avec les index, 1 pour la 1ère feuille...

Re : Suppression de liaisons Zut, j'ai pas pris la peine d'actualiser avant de poster. Tout comme JeanPierre je crois que tu vas devoir faire avec la commande Edition > Liaisons et supprimer une à une s'il le faut. Ciao

Re : Suppression de liaisons Salut bernardino, Si ce sont des liaisons simples faites par des formules Excel (sans VBA), alors à l'ouverture de ton classeur une boîte de dialogue t'informe de l'existance des liaisons et si tu veux les mettre à Jour. * Pour ton cas tu veux supprimer les...

Re : Recherche doublons + suppression lignes Le code ci-dessous devrait aller... Dans cet exemple la colonne "C" est celle des chiffres. Les chiffres commencent à partir de la 2ème ligne. Mais n'oublie pas que la suppression de la ligne concerne aussi les informations "Dates". Ciao...

Re : Rechercher et Remplacer Salut biloute91, Le code ci dessous devrait aller. Il remplace dans toutes les feuilles "RG1" en "RG01N" Ciao. Sub Version() Dim i As Integer For i = 1 To Sheets.Count Sheets(i).Activate Cells.Replace What:="RG1"...

Re : ouvrir et nommer feuille en auto Salut tout le monde, Une autre méthode... Sub NomAuto() Dim Nom As String Dim LigVide As Integer 'Initialisation LigVide = Application.WorksheetFunction.CountA(Worksheets("Feuil1").Range("A:A")) Nom = Range("A" & LigVide + 2).Text...

Re : Recopier une formule Bonjour Jean Pierre, Effectivement sur des sélections multiples, ce n'est pas possible. Mais en sélectionnant toute la plage (à recopier qui contient les formules) et en faisant la recopie incrémentée ca marche j'ai l'impression, et ce, que les cellules soient...

Re : Recopier une formule Salut tout le monde, Oui il est possible de recopier (recopie incrémentée) les formules d'une colonnes se trouvant sur plusieurs lignes mais attention aux références circulaires. Ceci sous réserve des informations complémentaires qui pourront permettre de mieux...

Re : comment faire un historique? Salut, Peut être joindre le fichier aurait permis de mieux comprendre... En tout cas, pour identifier la dernière ligne d'une plage de cellules, plusieurs méthodes : - La première cellule vide de la colonne "A" de la Feuille "Feuil1" NbLigne =...

Salut tout le monde Je viens donc m'excuser pour cet égarement qui n'a rien d'intentionel. José n'a pas tort car je me suis dispersé. Vraiment désolé et navré de cette imprudence.

Salut Eric, Et si tu utilisais Workbook_Activate() ?