Note: The other languages of the website are Google-translated. Back to English
English English

Comment faire pivoter une image en fonction d'une valeur de cellule dans Excel?

Dans Excel, nous pouvons faire pivoter l'image en faisant glisser la souris, mais avez-vous déjà essayé de faire pivoter une image en fonction d'une valeur de cellule. Par exemple, l'image sera pivotée de 90 degrés si la valeur de la cellule est de 90 dans la cellule A1, comme illustré ci-dessous.
doc rotation de l'image par cellule 1

Faire pivoter une image en fonction de la valeur de la cellule avec le code macro

Onglet Office Activez la modification et la navigation par onglets dans Office et simplifiez considérablement votre travail ...
Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%
  • Réutiliser n'importe quoi: Ajoutez les formules, les graphiques et tout autre élément les plus utilisés ou les plus complexes à vos favoris et réutilisez-les rapidement à l'avenir.
  • Plus de 20 fonctionnalités de texte: Extraire le numéro de la chaîne de texte; Extraire ou supprimer une partie des textes; Convertissez les nombres et les devises en mots anglais.
  • Outils de fusion: Plusieurs classeurs et feuilles en un seul; Fusionner plusieurs cellules / lignes / colonnes sans perdre de données; Fusionner les lignes en double et la somme.
  • Outils de fractionnement: Diviser les données en plusieurs feuilles en fonction de la valeur; Un classeur vers plusieurs fichiers Excel, PDF ou CSV; Une colonne à plusieurs colonnes.
  • Coller sauter Lignes cachées / filtrées; Compte et somme par couleur d'arrière-plan; Envoyez des e-mails personnalisés à plusieurs destinataires en masse.
  • Super filtre: Créez des schémas de filtres avancés et appliquez-les à toutes les feuilles; Sort par semaine, jour, fréquence et plus encore; Filtre par gras, formules, commentaire ...
  • Plus de 300 fonctionnalités puissantes; Fonctionne avec Office 2007-2019 et 365; Prend en charge toutes les langues; Déploiement facile dans votre entreprise ou organisation.

Faire pivoter une image en fonction de la valeur de la cellule avec le code macro


Seul un code de macro peut vous aider à faire pivoter une image en fonction d'une valeur de cellule dans Excel.

1. Tapez une valeur dans la cellule A1 par laquelle vous allez faire pivoter l'image, puis activez l'image que vous souhaitez faire pivoter.

2. presse Alt + F11 touches pour activer Microsoft Visual Basic pour applications fenêtre, et cliquez sur insérer > Module pour insérer un nouveau vide Module. Voir capture d'écran:
doc rotation de l'image par cellule 2

3. Collez le code ci-dessous dans le Module script, puis appuyez sur F5 pour exécuter le code. Voir la capture d'écran:

VBA: faire pivoter l'image par valeur de cellule

Sub RotateImage()
Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value
End Sub

doc rotation de l'image par cellule 3
doc rotation de l'image par cellule 1

Remarque : dans le code, A1 est la cellule sur laquelle vous souhaitez faire pivoter l'image, vous pouvez la modifier selon vos besoins.


Articles relatifs:


Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtréeplus
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammesplus
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellulesplus
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDFplus
  • Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

  • Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
bas de cabine
Commentaires (5)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
C'est ce que je veux faire pour une image, mais je veux qu'elle tourne à partir de la position verticale du nombre de degrés indiqué par la cellule à chaque fois. Cependant, disons que la cellule indique 30, elle pivotera de 30 degrés, mais si la valeur de la cellule passe à 15, elle pivotera de 15 à partir de la position 30 (45 à partir de la verticale). Je veux qu'il tourne 15 à partir de la verticale cette fois. Y a-t-il un moyen de faire cela?


Merci !
Ce commentaire a été minimisé par le modérateur sur le site
Salut, j'ai la même exigence aussi. Avez-vous par hasard compris comment faire pivoter l'image à partir de "zéro" à chaque fois ?
Ce commentaire a été minimisé par le modérateur sur le site
Désolé je n'ai aucune idée sur ce problème. Vous pouvez placer votre problème dans notre forum, peut-être que quelqu'un peut vous aider à le résoudre. https://www.extendoffice.com/forum.html
Ce commentaire a été minimisé par le modérateur sur le site
Prenez le code ci-dessus :

Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value

Et modifiez-le comme ceci:

Selection.ShapeRange.Rotation = ActiveSheet.Range("A1").Value
Ce commentaire a été minimisé par le modérateur sur le site
Prenez le code ci-dessus :

Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value

Et modifiez-le comme ceci:

Selection.ShapeRange.Rotation = ActiveSheet.Range("A1").Value
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés