> Tous les forums > Forum Bureautique
 ajouter "aller sur une cellule" dans une macro existanteSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
dlxpat
  Posté le 19/11/2021 @ 16:12 
Aller en bas de la page 
Astucien

Bonjour à tous

Sub aller_km()

Dim nx As Double

Dim lnx As Long

nx = _

Application.Max(Range("f:f"))

lnx = _

Application.Match(Application.Max(Range("f:f")), Range("f:f"), 0)

MsgBox "Valeur maximale : " & nx & _

vbCrLf & "Numéro de ligne du maximum : F " & lnx

End Sub

Cette macro me permet grâce à un msgbox d'afficher a valeur max (nx) d'une colonne (col F) ainsi que la cellule où se trouve cette cellule (lnx). Serait-il possible de rajouter une fonction après l'affichage du msgbox, une fonction qui me permette automatiquement de me positionner sur cette cellule ?

Merci d'avance



Modifié par dlxpat le 19/11/2021 17:39
Publicité
corinthien
 Posté le 19/11/2021 à 18:26 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour : Range("F" & nx).Select

dlxpat
 Posté le 19/11/2021 à 18:40 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

bonsoir Corinthien et merci de ta réponse ! mais cette fonction me met sur la cellule f2367 !!

dlxpat
 Posté le 19/11/2021 à 21:35 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Re-bonsoir, ta réponse m'a bien aidé mais il fallait écrire

Range("F" & lnx).Select

dossier soldé !

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
619,99 €Portable Dell Inspiron 15 3500 (15.6 pouces, FullHD, Core i5, 8Go, SSD 512 Go, GTX 1650) à 619,99 €
Valable jusqu'au 28 Janvier

RueDuCommerce fait une promotion sur l'ordinateur portable Dell Inspiron 15 3500 qui passe à 619,99 € alors qu'on le trouve ailleurs à partir de 749 €. Cet ordinateur possède un écran 15,6 pouces Full HD (1920x1080), un processeur Intel Core i5-10300H, 8 Go de RAM, un SSD NVMe de 512 Go et une carte graphique GeForce GTX 1650 4 Go. Le tout tourne sous Linux Ubuntu mais vous pouvez installer Windows 10/11 si vous voulez.


> Voir l'offre
79,99 €Alimentation PC modulaire NZXT C750 750W 80+ Gold à 79,99 €
Valable jusqu'au 29 Janvier

Topachat solde l'alimentation PC modulaire NZXT C750 750W 80+ Gold à 79,99 € au lieu de 119 €. Profitez du meilleur rapport silence/performance possible grâce au mode de ventilation hybride. Lorsque le niveau de charge de l'alimentation est inférieur à 100W, le ventilateur ne tourne pas, pour un silence de fonctionnement parfait à 0 dB. Au delà, le ventilateur 120 mm PWM à roulement hydraulique tourne lentement puis il ajuste sa vitesse de rotation en fonction de la charge. Cette alimentation intègre des condensateurs japonais, gage de qualité et de longévité. Elle est garantie 10 ans par NZXT, pour une utilisation en toute sérénité !


> Voir l'offre
11,99 €Micro clé USB 3.1 Sandisk Ultra Fit 64 Go à 11,99 €
Valable jusqu'au 28 Janvier

Cdiscount fait une promotion sur la micro clé USB Sandisk Ultra Fit d'une capacité de 64 Go qui passe à 11,99 €. La minuscule taille de cette clé USB va vous permettre de la laisser brancher en permanence sur votre portable, votre TV ou votre autoradio sans qu'elle dépasse de manière disgracieuse. Sa compatibilité USB 3.1 lui permet d'atteindre des débits jusqu'à 130 Mo/s. 


> Voir l'offre

Sujets relatifs
Excel - Extraire les données sur plusieurs lignes d'une cellule
comment remplacer automatiquement le contenue d'une cellule sur excel
Comment effacer automatiquement contenue d'une cellule ou la ligne sur exce
comment remplacer automatiquement le contenue d'une cellule sur excel
comment effacer automatiquement contenue d'une cellule sur excel
Aller chercher une valeur dans une cellule d'une autre feuille
récuperer les coordonnées d'une cellule sur une page excel
Lancer une macro par double clic sur une cellule
Faire apparaitre + sur une cellule excel
Image sur une cellule suivant sa valeur
Plus de sujets relatifs à ajouter "aller sur une cellule" dans une macro existante
 > Tous les forums > Forum Bureautique