Rotar imágenes del formulario

[pegones1]

.

Anteayer se planteó una consulta en el foro de Microsoft Excel for Developers sobre como rotar una imagen en un formulario, cosa que no es nada fácil. Nada que ver con Girar o voltear una imagen, forma, cuadro de texto o WordArt - Excel - Office.com

[DBOX]rotate a picture on a form[/DBOX]

Al final Andreas Killer la resolvió en este foro:

[DBOX]rotate a picture on a form - Microsoft Community[/DBOX]

Se basó en un foro alemán de Visual Basic:

[DBOX]VB 5/6-Tipp 0659: Grafik mittels GDI+ drehen und spiegeln - ActiveVB[/DBOX]

Y yo he copiado la idea y adjunto mi aporte sin haber analizado la API de Windows GDI+

La tengo como tarea pendiente y me lleva de cabeza. Pincha click en ella para rotarla. :excitement:

P.D.: Nada que ver con el aporte de mi querido romano Macro Antonio, pues lo acabo de leer después de subir este archivo

[DBOX]https://www.ayudaexcel.com/foro/ideas-aportes-64/simular-animacion-formulario-20184/[/DBOX]

RotarImagen-PW1.zip

[Antoni]

Igual de feo, normal que rotado,.....jajaja.

Así también funciona

    Me.MiImagen2.Picture = FlipRotatePicture(Me.MiImagen1.Picture, Rotate90Flipnone)

    Me.MiImagen3.Picture = FlipRotatePicture(Me.MiImagen2.Picture, Rotate90Flipnone)

    Me.MiImagen4.Picture = FlipRotatePicture(Me.MiImagen3.Picture, Rotate90Flipnone)[/CODE]

y así también

[CODE]

Me.MiImagen2.Picture = FlipRotatePicture(Me.MiImagen1.Picture, Rotate90Flipnone)
Me.MiImagen3.Picture = FlipRotatePicture(Me.MiImagen1.Picture, Rotate180Flipnone)
Me.MiImagen4.Picture = FlipRotatePicture(Me.MiImagen1.Picture, Rotate270Flipnone)[/CODE]

Un saludo.

[pegones1]

He leído tu respuesta sin ver el código y ya pensé, este Macro Antonio me ha "chafao" el aporte con alguna macro que no usa la API GDI+ :bull_head:

Al ver el código me ha tranquilizado saber que añade ejemplos del uso de la función FlipRotatePicture, ¡¡¡ el alma de mi archivo !!! :star:

Macro Antonio, como no te gusta mi cara, la próxima meteré una imagen de tu amada Cleo. :love_heart:

[Antoni]

He leído tu respuesta sin ver el código y ya pensé, este Macro Antonio me ha "chafao" el aporte con alguna macro que no usa la API GDI+

No te creas, que intentarlo, ya lo he intentado,....jejeje