transformer une macro PC/Mac

poipoi

XLDnaute Occasionnel
bonjour le forum
ma fille travaille sur MAC loin d'ici et moi sur PC
grace à vos contributions je lui ai mis des macros dans un petit classeur.

une pour trier automatiquement dès l'insertion d'un nom dans A:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
m = Target
[a4:O1000].Sort Key1:=[A4]
[a:a].Find(What:=m, LookIn:=xlValues).Select
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
With ActiveCell
.EntireRow.Interior.ColorIndex = 36
End With
End Sub

et l'autre pour colorer la ligne active:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
With ActiveCell
.EntireRow.Interior.ColorIndex = 36
End With
End Sub

ma question rejoint celle de nombreux autres, comment faire pour que ça marchez chez elle... (sachant que je n'ai pas de MAC ici) ? est-ce qu'il existe des concordances, des similitudes pour qu'à distance je puisse éventuellemnt bricoler un truc
d'avance merci à vous
 

Discussions similaires

Statistiques des forums

Discussions
312 489
Messages
2 088 851
Membres
103 974
dernier inscrit
chmikha