> Tous les forums > Forum Bureautique
 Macro vers une cellule précise à un endroit précis
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
LN
  Posté le 24/10/2004 @ 15:34 
Aller en bas de la page 
Petite astucienne

Bonjour à tous et à toutes, j'ai voulu effectuer une macro pour aller vers une cellule précise. J'ai réussi mais j'aimerai apporter une amélioration. La macro que j'ai faite donne ceci : Sub test() ' ' ' ActiveWindow.SmallScroll Down:=55 ActiveWindow.SmallScroll ToRight:=16 Range("R57").Select End Sub J'aimerai pouvoir spécifier que la cellule R57 doit se situe dans le coin en haut à gauche de la feuille.... ce que je ne peux pas prévoir avec cette macro. En parcourant l'aide, j'ai vu object.ScrollLeft et object.ScrollTop mais il semblerait que mon Excel ne les reconnait pas. Est-ce quelqu'un aurait compris ma question et aurait une solution à me proposer ?? Merci
Publicité
Marmotte18
 Posté le 24/10/2004 à 16:19 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour, Dans ta macro, il faut d'abord lui indiquer les dimensions de ta feuille de calcul pour qu'il se retrouve toujours dans la même situation quand on lui fait faire des "scrolls" Sub VersCelluleR57() 'Définition de dimensions de la feuille de calcul With ActiveWindow .Width = 569.25 .Height = 318.75 End With With ActiveWindow .Top = 1.75 .Left = 13.75 End With 'Donne le point de départ des déplacements Range("A1").Select 'Recherche la cellule R57 et l'affiche en haut et à gauche ActiveWindow.SmallScroll ToRight:=17 ActiveWindow.SmallScroll Down:=56 Range("R57").Select End Sub Marmotte18 [IMG]http://img97.exs.cx/img97/7449/Mimoza.jpg[/IMG] Dite le avec des fleurs, c'est tellement plus gentil ...
LN
 Posté le 24/10/2004 à 16:50 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne

j'essaierai ça alors, merci Marmotte ! mais comment connait-on les dimensions de la feuille ? et les dimensions changent-elles selon l'ecran d'ordinateur que l'on a ??
galopin01
 Posté le 24/10/2004 à 16:51 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien
Bonjour, Voici 2 macros qui répondront sans doute à ton problème la 3ème sert de démonstration. Sub PlaceR(Z As Range) i = Z.Row: j = Z.Column ActiveWindow.ScrollRow = i ActiveWindow.ScrollColumn = j End Sub Sub PlaceC(i%, j%) ActiveWindow.ScrollRow = i ActiveWindow.ScrollColumn = j End Sub Sub Test() PlaceC 51, 22 MsgBox "PlaceC active une cellule suivant la notation Row, Column" & Chr(13) & _ Space(33) & "ici 51,22 = V51" PlaceR [R46] MsgBox "PlaceR active une cellule suivant la notation Range [R46]" End Sub Ok ?

Modifié par galopin01 le 24/10/2004 16:52
Marmotte18
 Posté le 24/10/2004 à 17:08 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonsoir, LN, quand tu utilises ta macro automatique, c'est à dire Outils / Macro / Nouvelle macro il suffit de déplacer le bord droit de ta fenêtre un peu à droite ou à gauche Faire de même avec le bord gauche, le bord haut et le bord bas. Excel calculera lui même les dimensions de ta fenêtre. La macro que je t'ai fournie, fonctionne telle qu'elle avec les dimensions de ma fenêtre de test. Elle est opérationnelle chez toi ! Marmotte18 [IMG]http://img97.exs.cx/img97/7449/Mimoza.jpg[/IMG] Dite le avec des fleurs, c'est tellement plus gentil ...

Modifié par Marmotte18 le 24/10/2004 17:15
LN
 Posté le 24/10/2004 à 17:31 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne

oula !! et bien je prends des notes et j'essaierai tout ça ! merci bien !
LN
 Posté le 07/11/2004 à 18:11 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne

alors voilà j'ai fait mon truc, je dois dire que pour les histoires de dimension de la feuille, j'ai rien compris [confus] au final, la macro nommée PlaceR est plutot pas mal et je l'aime bien. j'ai pas très bien compris PlaceC !!!!!! par contre, il y a un inconvenient à toutes ces macros c'est qu'on ne peut pas ajouter de lignes ou de colonnes, savez vous si il existe une macro qui évolue en fonction de ces changements ou si on peut se placer sur une cellule en spécifiant une condition par exemple..... !!!?? merci
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
198,22 €Processeur AMD Ryzen 5 3600 à 198,22 € livré
Valable jusqu'au 07 Mars

Amazon Allemagne fait une promotion sur le processeur AMD Ryzen 5 3600 qui passe à 191,50 €. Comptez 6,72 € pour la livraison en France soit un total de 198,122 € livré alors qu'on le trouve ailleurs à partir de 215 €. Le processeur AMD Ryzen 5 3600 Wraith Spire (3.6 GHz / 4.2 GHz) fait partie des premiers processeurs pour PC gravés en 7 nm. Ses 6 coeurs et 12 threads, une fréquence jusqu'à 4.2 GHz et 35 Mo de GameCache le rendent polyvalent, il vous permet de tout faire rapidement et en toute fluidité. En cette période tendue pour les prix des composants informatiques, c'est une bonne affaire.

Vous pouvez utiliser votre compte Amazon France sur Amazon Allemagne et il n'y a pas de douane. Si vous êtes perdu en allemand, vous pouvez traduire le site en anglais.


> Voir l'offre
17,99 €Clé USB 3.0 Philips Flash Drive Vivid Edition 128 Go à 17,99 €
Valable jusqu'au 08 Mars

Amazon fait une promotion sur la clé USB 3.0 Philips Flash Drive Vivid Edition 128 Go qui passe à 17,99 € alors qu'on la trouve ailleurs autour de 30 €. La livraison en relais colis est gratuite.


> Voir l'offre
65,67 €Casque HyperX Cloud II (PC, Xbox One, PS4, Switch) à 65,67 € livré
Valable jusqu'au 06 Mars

Amazon Allemagne fait une promotion sur l'excellent casque gaming HyperX Cloud II qui passe à 59,99 € grâce à un coupon de réduction automatiquement appliqué dans la panier. Comptez 5,68 € pour la livraison en France soit un total de 65,67 € livré alors qu'on le trouve ailleurs à partir de 89 €. Le contrôle indépendant de l'audio et du microphone permet de régler non seulement le volume sonore mais aussi le niveau du micro (qui est détachable). Vous pouvez aussi activer le son Surround 7.1 ou le micro. Il peut se connecter en USB sur PC et Mac et via jack 3.5 mm sur PS4, Xbox One, Switch et mobile.

Vous pouvez utiliser votre compte Amazon FR sur Amazon DE et il n'y a pas de douane.


> Voir l'offre

Sujets relatifs
se positionner avec une macro dans une cellule précise
export cellule vers image
Recopie cellule par macro
Excel 2007 macro rajouter tri + cellule en surbrillance à chaque changement
Macro Copier ligne vers un autre fichier
(Macro Excel) Sélectionner cellule en fonction de sa couleur
excel vba passer une variable de commande vers macro
transfert d'une cellule vers une autre
Execution macro lors d'une saisie dans une cellule
Compatibilité Macro Word2003 vers Word2000
Plus de sujets relatifs à Macro vers une cellule précise à un endroit précis
 > Tous les forums > Forum Bureautique