Utilisation d'une macro excel dans google sheet

Fermé
sbabkev - 15 oct. 2021 à 16:05
 sbabkev - 17 oct. 2021 à 09:33
Bonjour,

J'utilise une macro pour ma facturation. En gros j'ai une page avec des produits ou lorsque je met un x dans la colonne E (sur la ligne du produit que je veux facturer), cette ligne apparait sur mon devis.
Je souhaite reprendre cette macro mais dans un google sheet car les macro excel ne fonctionnent pas sur ipad.

Ci dessous la macro en question

Sub Listing()
Dim i As Integer, n As Integer, j As Integer
j = 17

i = Sheets("PRODUITS").Range("A65536").End(xlUp).Row
'On Boucle sur la colonne où les "x" peuvent être saisies

Sheets("DEVIS").Range("A17:C69").Value = ""

For n = 1 To i
If Sheets("PRODUITS").Range("D" & n).Value = "x" Then
Sheets("DEVIS").Range("A" & j).Value = 1
Sheets("DEVIS").Range("B" & j).Value = Sheets("PRODUITS").Range("A" & n).Value
Sheets("DEVIS").Range("C" & j).Value = Sheets("PRODUITS").Range("C" & n).Value
Sheets("DEVIS").Range("F" & j).Value = Sheets("PRODUITS").Range("B" & n).Value
j = j + 1
End If
Next n
j = 17
Call ShowAllLine
Call HideAllLine
End Sub

Sub ShowAllLine()
Sheets("DEVIS").Activate
Rows("17:69").Select
Selection.EntireRow.Hidden = False
End Sub

Sub HideAllLine()
Dim max As Integer, i As Integer
max = 69
j = 17

For n = j To max
If Sheets("DEVIS").Range("A" & n).Value = "" Then
Sheets("DEVIS").Range("A" & n & ":A" & n).Select
Selection.EntireRow.Hidden = True
End If
Next n
End Sub

merci de votre aide

Configuration: Windows / Chrome 94.0.4606.81
A voir également:

3 réponses

Utilisateur anonyme
15 oct. 2021 à 19:13
Bonjour
Les macro MS Excel sont en VBA (Visual Basic for Application) et ne fonctionnent que dans l’environnement de MS Excel.
Le langage pour Google Sheet est le GAS (Google Application Script) et ne fonctionne que dans l’environnement Google..
Il faut soit ré-écrire la macro soit la convertir, Google propose un convertisseur VBA -> GAS mais payant dans le Google Workspace Marketplace:
A+
1
Merci d avoir prit le temps de répondre
Je vais voir du coup pour convertir le code
0
Utilisateur anonyme
16 oct. 2021 à 20:26
Bonjour
Pas trop le choix !
C'est la guerre des gangs ;-)
A+
0
Bonjour
j'ai voulu convertir vba en google sheet en telechargeant l'appli mais je suis bloqué car je n'ai pas la version entreprise. ci dessous le message d'erreur.
"You do not have access to this add-on.
This product is restricted to customers using a G Suite Enterprise license.
To upgrade your license or if you believe this is an error, please contact your domain administrator. "

quelq'un aurait cet acces et pourrait me convertir ma macro ci dessous
merci a vous
0