× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 Déplacement automatique d'une image avec la sourisSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
oisien
  Posté le 10/07/2010 @ 13:24 
Aller en bas de la page 
Petit astucien

Bonjour

Je ne sais pas si je suis au bon endroit pour poster.

Je cherche l'outil qui permet le déplacement automatique d'un image ou par exemple une signature dés que l'on veux mettre la souris dessus.J'ai déjà vu cela sur le net mais je ne sais pas le réaliser!

merci d'avance

Publicité
Gabrilou
 Posté le 10/07/2010 à 17:22 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucienne

Bonjour Oisien

Avec quel logiciel, Word, Excel, un autre ?

roberique
 Posté le 11/07/2010 à 05:43 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

à oisien.

Bonjour,

Je suppose que tu utilises Word...

Qu'entends-tu par déplacement automatique de l'Image ?

Veux-tu qu'elle se déplace "avec le texte"? ou veux-tu la placer là où tu as en envie ?

A+

oisien
 Posté le 11/07/2010 à 15:50 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Non en fait je veux quelle s'esquive dés que l'on essaie de cliquer dessus c'est pour faire une animation j'ai le pack office 2003 et en dual boot xp et w7

merci

Marmotte18
 Posté le 11/07/2010 à 21:11 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour,

Voici 2 macros à mettre dans Feuil1(Feuil1) :

Private Sub Image1_Click()
Image1.Visible = False
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, Range("A1:A6")) Is Nothing Then
Image1.Visible = False
Exit Sub
End If

If Not Intersect(Target, Range("B1:IV6")) Is Nothing Then
Image1.Visible = True
Exit Sub
End If

If Not Intersect(Target, Range("A7:IV65536")) Is Nothing Then
Image1.Visible = True
End If

End Sub

  • Quand tu cliques sur l'image qui se trouve dans la plage A1:A6, elle disparaît.
  • Quand tu cliques en dehors de la page A1:A6, l'image apparaît.
  • Quand tu déplaces le curseur avec les touches (haut, bas, gauche ou droite) en étant sur la plage A1:A6, l'image est escamotée.
  • Quand tu déplaces le curseur avec les touches (haut, bas, gauche ou droite) en étant en dehors de la plage A1:A6, l'image revient.

Ci-joint le fichier de démonstration : http://www.cijoint.fr/cjlink.php?file=cj201007/cijIfLDCeX.xls



Modifié par Marmotte18 le 11/07/2010 21:33
oisien
 Posté le 12/07/2010 à 09:15 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Marmotte 18 merci j'essaie la procédure

bonne journée

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
26,99 €Clé USB 3.0 et Micro USB Sandisk Ultra OTG 128 Go à 26,99 €
Valable jusqu'au 03 Juin

Amazon fait une promotion la nouvelle version de la clé USB 3.0 SanDisk Dual Drive 128 Go qui passe à 26,99 € livrée gratuitement. La particularité de cette clé USB réside dans le fait qu'elle dispose à la fois d'un connecteur USB pour la brancher sur votre ordinateur ou votre TV, mais également d'un connecteur micro USB pour la brancher sur votre smartphone ou votre tablette. Compatible USB 3.0 (et 2.0), cette clé USB offre des débits jusqu'à 150 Mo/s. 


> Voir l'offre
14,88 €Windows 10 Pro 32/64 bits OEM à 14,88 €
Valable jusqu'au 04 Juin

Le vendeur sérieux DIGITAL FR propose sur Amazon  la clé d'activation pour Windows 10 professionnel en français 32 bits / 64 bits à 14,88 €. Cette clé livrée par email fonctionne avec l'outil d'installation et de création de support de Microsoft que vous pouvez télécharger ici ou directement avec l'ISO de Windows 10 Pro. De quoi installer légalement Windows 10 Pro sur un PC. Pour en savoir plus sur l'achat et l'installation d'une clé OEM de Windows 10, suivez les indications de notre dossier pratique.


> Voir l'offre
349,99 €Console Nintendo Switch avec paire de Joy-Con à 349,99 €
Valable jusqu'au 03 Juin

Fnac propose la console Nintendo Switch (autonomie améliorée) avec une paire de Joy-Con rouge et bleu à 349,99 € livrée gratuitement.


> Voir l'offre

Sujets relatifs
planification automatique image de disque d'acronis
Détourage d'une image avec outil plume
comment marque les $ avec la souris
Insertion image avec Excel2000
déplacement d'image impossible word 2007
forme automatique et image dans Word
Déplacement d'un objet Excel avec les flèches
copier-coller avec souris impossible dans off 2007
créer une carte de visite avec image
Mail automatique avec fichier Excel
Plus de sujets relatifs à Déplacement automatique d''une image avec la souris
 > Tous les forums > Forum Bureautique