XL 2016 VBA - Convertir 2 Long en LongLong

Dudu2

Dudu2

XLDnaute Barbatruc
Bonjour,

J'ai des fonctions qui savent convertir une structure POINTAPI en LongLong.
Mais j'aimerais convertir directement 2 Long en 1 LongLong (le premier sur les 32 premiers bits, le deuxième sur le 32 derniers).
Par quoi multiplier le 1er ? 2 ** 32 ? Avant d'ajouter le 2ème. Ça ne marche pas !
Merci par avance.
 
Dernière édition:
Solution
Dudu2
Sinon je mets dans ce post-solution cette conversion simple qui fonctionne... jusqu'à preuve du contraire !
VB: 
#If Win64 Then    
    Function TwoLongToLongLong(X As Long, Y As Long) As LongLong
        TwoLongToLongLong = Y * 2 ^ 32 + X
    End Function
#End If

Ou encore:
Code: 
Private Type POINTAPI
    X As Long
    Y As Long
End Type

#If Win64 Then
    Function POINTAPIToLongLong(Pt As POINTAPI) As LongLong
        POINTAPIToLongLong = Pt.Y * 2 ^ 32 + Pt.X
    End Function
#End If
Trier par date Trier par votes

Discussions similaires

Dudu2
  • Question
XL 2016 VBA - Déclarations des fonctions l'API Windows
3 4 5
Réponses
71
Affichages
3 K
Dudu2
Dudu2
M
  • Résolu(e)
Power Query Convertir un fichier PdF en Excel et restitution d'un état de synthèse
Réponses
10
Affichages
458
Merlin258413
M
youky(BJ)
  • Question
Microsoft 365 lire .wav en 32 ou 64bits VBA
Réponses
7
Affichages
608
matlatarte
M
L
  • Question
XL 2019 formule index equiv en VBA
Réponses
10
Affichages
515
Loïc DUBOIS
L
H
  • Question
Microsoft 365 Automatiser la conversion des montants en fonction des devises
Réponses
6
Affichages
346
sylvanu
sylvanu
H
  • Question
Microsoft 365 Mise en forme conditionnelle sur autre tableau
Réponses
2
Affichages
214
hbb
H
M
  • Résolu(e)
XL 2013 Macro qui compare deux tableaux et supprime des lignes selon un critère.
Réponses
4
Affichages
259
manu49300
M
M
  • Question
Microsoft 365 Convertir données cellules en lignes
2 3
Réponses
38
Affichages
1 K
matmac
M
A
  • Question
XL 2019 Filtre avancé en VBA
Réponses
12
Affichages
311
Amilo
A
P
  • Question
Power Pivot Filtrer une somme en fonction de filtres sur un graphique
Réponses
2
Affichages
192
Pierre111
P

Membres actuellement en ligne

17 membres et 149 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
312 211
Messages
2 086 292
Membres
103 171
dernier inscrit
clemm