Dim last As String last = (xlDown). Address(RowAbsolute:=False, ColumnAbsolute:=False) Range("A1:"& last) Resize aussi marche très bien. Mais là il faut au préalable récupérer le numéro de la dernière ligne Dim lastcell As Long lastcell = (, 1)(xlUp) Range("A1")(lastcell, 1) Toutes ces solutions marchent très bien. Merci beaucoup pour ton aide. Comment trouver la dernière ligne ou colonne avec des données dans Excel?. Grâce à toi je dormirai un peu moins zéro ce soir - Edité par Gelal 1 octobre 2018 à 17:53:07 × Après avoir cliqué sur "Répondre" vous serez invité à vous connecter pour que votre message soit publié. × Attention, ce sujet est très ancien. Le déterrer n'est pas forcément approprié. Nous te conseillons de créer un nouveau sujet pour poser ta question.
Paramétrages de cookies × Cookies fonctionnels Ce site utilise des cookies pour assurer son bon fonctionnement et ne peuvent pas être désactivés de nos systèmes. Nous ne les utilisons pas à des fins publicitaires. Si ces cookies sont bloqués, certaines parties du site ne pourront pas fonctionner. Mesure d'audience Ce site utilise des cookies de mesure et d'analyse d'audience, tels que Google Analytics et Google Ads, afin d'évaluer et d'améliorer notre site internet. Vba dernière ligne download. Google Analytics Google Ads Contenus interactifs Ce site utilise des composants tiers, tels que NotAllowedScript628ff991c9f0aReCAPTCHA, Google NotAllowedScript628ff991c9b85Maps, MailChimp ou Calameo, qui peuvent déposer des cookies sur votre machine. Si vous décider de bloquer un composant, le contenu ne s'affichera pas Google Maps Calameo reCaptcha V2 reCaptcha V3 Réseaux sociaux/Vidéos Des plug-ins de réseaux sociaux et de vidéos, qui exploitent des cookies, sont présents sur ce site web. Ils permettent d'améliorer la convivialité et la promotion du site grâce à différentes interactions sociales.
Bonjour, dans le cadre d'un projet d'automatisation d'un processus je doit remplir toute une colonne avec une formule! Grâce à l'enregistrement des macros j'ai pu découvrir ça: Range("I" & [I65000](xlUp)) J'aimerais adapter tout ça en ajoutant 1 ligne, donc vulgairement: Range("I" & [I65000](xlUp) +1) Seulement j'ai une erreur "La méthode autofill de la classe Range à échoué" Merci d'avance pour votre aide;)
Couvre également les cas où la plage nommée ne commence pas à partir de la première ligne. Sub FindingLastRow() Dim sht As Worksheet Dim LastRow As Long Dim FirstRow As Long Set sht = heets("form") 'Using Named Range "MyNameRange" FirstRow = ("MyNameRange") ' in case "MyNameRange" doesn't start at Row 1 LastRow = ("MyNameRange") + FirstRow - 1 Mettre à jour: Une lacune potentielle a été signalée par @Jeeped pour une plage nommée avec des lignes non contiguës car elle génère un résultat inattendu. Pour résoudre ce problème, le code est révisé comme ci-dessous.
GooglePlus LinkedIn Pinterest Instagram YouTube Vimeo Dailymotion Autres cookies Ce site web utilise un certain nombre de cookies pour gérer, par exemple, les sessions utilisateurs.
skytimetravel.net, 2024