pakdoltogel.net
Sans vous, j'aurai pas eu ce que je souhaitais. je voudrai vous remercie beaucoup pour le temps que vous m'avez accordé et pour votre aide précieux #13 Re, Après un bon moment de bidouillage dans le VBA, finalement j'ai réussi à obtenir la macro que je souhaite, Tant mieux. Comment sélectionner la dernière cellule avec des données dans une ligne / colonne dans Excel?. Dans ce cas, publie là ici dans ta discussion, elle pourrait intéresser d'autres membres du forum. #14 Bonsoir Staples1600, las-dias Ayant excel 2003, je ne peux pas non plus m'y intéresser sur la partie "tableau", centrale à cette demande. Toutefois, si vous supprimez plusieurs lignes au départ de votre code (point 2), le démarrage de votre tableau sera impacté (plus A10 mais A7). Le point de blocage étant de ma compréhension cette "dernière ligne" à définir, n'hésitez pas à utiliser une variable, par exemple: dim derligne as integer et l'une ou l'autre des données à aller rechercher: derligne = Cells(7, 1)(xlDown) (il ne faut pas de cellule vide jusqu'à la dernière ligne dans la colonne de recherche concernée en partant de cellule A7 de votre tableau derligne = Cells(, 1)(xlUp) (dernière ligne en partant du bas de la feuille, sur la première colonne) Cela devrait vous permettre, si vous avez à compléter le code de Staple1600, de finaliser votre demander.
lermite Membre impliqué Messages 1'583 Votes 74 Excel 2000/2007FR gloub a écrit: Merci. Pour ça il n'y a rien à faire, il faut sauver le classeur et le réouvrir, c'est un bug d'Excel connu. il garde la dernière ligne en mémoire même si ont la supprime. 2007 Emploi architecte Lieu paris ACCES PREMIUM Soutenez le site en devenant membre Premium et profitez de plusieurs options exclusives: Navigation sans publicités Option "No Tracking" Option "Mode Incognito" Option "Dark Mode" @lermite: merci pour ta réponse. Dernière ligne d une colonne vba par. Comme Zirak m'a fourni une solution sans bug d'Excel, donc je l'adopte! Mais merci de m'avoir aidé. @Zirak: merci, ça marche! Sinon détrompe-toi, ce n'est pas la honte de ne pas savoir qui m'a orienté vers les formules (au minimum, mon pseudo m'en préserve), c'est juste que je maîtrise mieux les formules que le vba. Dernier truc, dans une des feuilles où je veux mettre en oeuvre ton code, il y a déjà une macro qui fait beuguer ton code. Tu pourrais m'aider à les rendre compatibles?
Vous voulez ajouter une nouvelle colonne pré-remplie à votre tableau mais pas n'importe comment!? Elle doit en effet se placer juste après la dernière colonne remplie (ou non vide si vous préférez ce terme) En général, le code en VBA va vous retournez le numéro de la colonne seulement Ici nous verrons comment récupérer la lettre de cette colonne Sympa non? Petit rappel pour activer l'onglet « Développeur » Mise en place du code VBA Nous ajouterons le code ci-dessous dans « ThisWorkBook » Sub TrouverColonne() Dim MaColonne As String Dim i As Integer i = 1 ' Numéro de la ligne à vérifier MaColonne = Range("IV" & i)(xlToLeft) actif = LetCol(MaColonne + 1) MsgBox ("Ligne: " & i & " Colonne: " & actif) End Sub Function LetCol(NoCol) LetCol = Split(Cells(1, NoCol). Dernière ligne d une colonne vba de. Address, "$")(1) End Function Pas de panique! nous allons expliquer le code plus bas Mise en place d'un bouton pour activer notre macro Si vous nous suivez, ce ne doit pas être nouveau mais pour rappel Onglet « DEVELOPPEUR » « Insérer » « Bouton (Contrôle de formulaire) » Et vous dessinez votre bouton de contrôle ou vous le souhaitez et vous le nommerez « Dernière Colonne » Par exemple: Vous pouvez affecter la macro « TrouverColonne » Pour rappel c'est la première ligne de notre code VBA et qui correspond au nom de notre Macro Vous pouvez essayer et vous aurez déjà un résultat!
Nous avons, pour cela, légèrement modifié, le code précédent: nous avons remplacé la commande Select par la commande Row. Ne confondons pas Rows en VBA qui représente une ligne dans Excel avec la commande Row qui représente un N° de ligne.
J'ai essayé d'utilisé ces lignes mais ça ne fonctionne pas Sub Ligne_Index() Dim Index As Long Dim New_FED_Num As Long Index = Range("L2") - 1 New_FED_Num = Format(Index, "0000") MsgBox New_FED_Num End Sub i20100 Passionné d'Excel Messages 6'046 Votes 715 Excel 2010 Inscrit 16. 2017 Lieu Québec, Canada re, peux-tu joindre un fichier pour que l'on voit la disposition des données? aussi indique à partir de quel ligne la recherche doit être fait. L'agonie du globe, Jacques Spitz a archer Membre impliqué Messages 1'286 Votes 174 Excel 2010 Bonjour A voir Nlig = Range("L2")(xlDown) A+ Maurice Si ton problème est résolu, n'oublie pas de marquer les posts qui ont permis de résoudre le problème à l'aide du bouton L Contributeur Messages 10'070 Fichiers 45 Votes 1'203 Excel 365 FR Tél. 539'794 Inscrit 14. 10. 2014 Emploi Contributeur bénévole au site Lieu Bordeaux Bonjour Le résultat d'un format est du texte, n'avez vous pas une erreur de type? Vba sélectionnez la dernière colonne d'une ligne - VBA exemple de code. Résultat as string Résultat = Format(index, "0000") Pas essayé je suis sur téléphone... @ bientôt LouReeD Pour bien faire il faut déjà faire!