XL 2016 figer une image

halecs93

halecs93

XLDnaute Impliqué
Bonjour à tout le monde,

Je souhaite figer une image (issue de l'appareil photo) d'Excel sur une feuille de façon à ce qu'elle reste toujours visible lorsque je la fais défiler de haut en bas en utilisant l'ascenseur.

Y aurait-il un moyen ?

Merci
 
Solution
job75
Bonjour halecs93, vgendron, Bruno,

Voyez le fichier joint et ce code dans ThisWorkbook qui tourne en arrière-plan :
VB: 
Private Sub Workbook_Open()
Application.OnTime 1, "ThisWorkbook.ArrierePlan" 'lance la macro
End Sub

Private Sub ArrierePlan()
Dim P As Range, col%, lig&, t#
Set P = [MaZone] 'plage nommée
col = 2 'colonne de destination, à adapter
Do
    lig = ActiveWindow.ScrollRow 'mémorise la ligne
    t = Timer + 0.2 'temporisation de 0.2 seconde
    While Timer < t And t < 86400: DoEvents: Wend
    If ActiveWorkbook.Name = Me.Name Then If ActiveSheet.Name = P.Parent.Name Then _
        If ActiveWindow.ScrollRow <> lig Then P.Cut Cells(ActiveWindow.ScrollRow + 3, col) 'couper-coller
Loop
End Sub
Actionnez la barre de...
Trier par date Trier par votes
halecs93

halecs93

XLDnaute Impliqué
Re bonjour,

Du coup, je mets à dispo mon fichier anonymisé après y avoir adapté le code de Job75.

L'ensemble de la macro semblera aux "pros" du forum un peu/beaucoup fouillis... mais bon, on fait c'qu'on peut avec c'qu'on a ;)
 

Pièces jointes

  • PLANNING HEBDO 2023-2024 EXCEL DOWNLOADS.xlsm
    122 KB · Affichages: 4
Vote positif 0 Vote négatif

Discussions similaires

B
  • Question
Microsoft 365 afficher les photos dans un TCD
Réponses
10
Affichages
256
chris
chris
jeff1494
  • Question
XL 2021 Orientation d'une image dans le commentaire d'une cellule
2 3
Réponses
42
Affichages
2 K
AtTheOne
AtTheOne
T
  • Résolu(e)
Microsoft 365 Insérer une image DANS une cellule
Réponses
12
Affichages
529
Thomi
T
BenHarber
  • Question
Microsoft 365 usf : insérer une images qui fait office de bouton
Réponses
2
Affichages
257
BenHarber
BenHarber
J
  • Question
Microsoft 365 Enregistrer une image dans un dossier
Réponses
5
Affichages
605
job75
job75
G
  • Question
Microsoft 365 [résolu] VBA - insertion d'image
Réponses
3
Affichages
532
garth_algar
G
philsogood
  • Question
XL 2019 Impossible de coller une image
Réponses
3
Affichages
444
crocrocro
C
L
  • Question
XL 2016 Liste déroulante d'image
2
Réponses
17
Affichages
1 K
littlebird2
L
B
  • Question
XL 2016 Figer des lignes au fil du défilement
Réponses
2
Affichages
500
BobLemon
B
D
  • Résolu(e)
XL 2013 Envoyer un tableaux Excel nommé sous format image via Outlook
Réponses
12
Affichages
486
driss Kor
D

Membres actuellement en ligne

3 membres et 52 invités.

Partager cette page

Tutos vidéos

Power Query : Ajouter des requêtes (Excel et Power BI)
Créez votre première fonction LAMBDA dans Excel en 3 étapes!
LAMBDA, l’arme secrète de Microsoft pour Excel !
Office Insider - Découvrez les nouveautés Excel avant tout le monde

Statistiques des forums

Discussions
314 499
Messages
2 110 249
Membres
110 711
dernier inscrit
chmessi