Protection contre la copie

  • Initiateur de la discussion Initiateur de la discussion bruno31
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

bruno31

XLDnaute Nouveau
Bonjour,

je développe actuellement un " logiciel " sur base de Excel fonctionnant avec liens hypertextes et formules itératives.
je souhaite vendre mon travail mais me pause la question suivante :
comment se protéger des copies sur un support comme Excel ?
existe t il un moyen de contrôle permettant d'interdire le " enregistrer sous " ?
peut on limiter à défaut ce " enregistrer sous " à un utilisateur unique ?

merci d'avance pour vos lumières 🙂
 
Re : Protection contre la copie

Merci de ton intérêt Joss pour ce principe.
Cependant il reste le problème de la pratique, puisque je suis incapable de faire moi-même cette macro, donc je ne sais pas vraiment ce que cela donnerai.

Merci pour vos lumières
 
Re : Protection contre la copie

J'en suis au même stade que toi...Il doit être possible de demander à VBA de "scanner" un répertoire (celui ds lequel se trouve le fichier qui tue!) et de détecter sa présence (if exist...?) Je vais chercher
A+
 
Re : Protection contre la copie

Bonsoir à tous,

Après bien des déboires, intenet, disque dur, etc,,,, me revoilà

Quel est donc ce "programme" qui vaut tant pour le protéger et le vendre...???

Pour le vendre, il faut qu'il soit parfait.... et .... et.... les mots me manquent...

Et si le pékin n'active pas les macros... hé...hé... on fait quoi ?

Une appli., c'est pour son propre confort et ceux des gens à qui on la dédit (collègues, amis et même clients quelquefois).

Cette appli. est-elle parfaite au point de.... ?

Bonsoir eet bonne reflexion à vous.

Jean-Pierre
 
Re : Protection contre la copie

Bonsoir à toi Jean-Pierre et au forum,

je ne voulais pas rentrer dans les détails, mais les réponses m'obligent à le faire :
je vends un conseil en marketing et gestion pour un secteur régional...
De plus je développe un logiciel pour leur tracabilité obligatoire dans leur exploitation, composé de :
- un fichier excel, pour qu'ils rentrent leurs données
- et un logiciel interne qui retraite leurs données issues du fichier excel pour en sortir un document qui a une valeure légale aux yeux de l'admnistration...En d'autres termes je ne vends pas un fichier Excel, mais une prestation de services qui s'appuie sur les services d'Office.
Mon problème étant qu'un exploitant X puisse transmette ce fichier excel à son pote/concurrent "Y" sur ce secteur, et que ce Mr Y croit qu'avec ce fichier il est tranquille.
Or c'est faux, Mr Y n'arrivera pas à justifier, aux yeux de l'administration sa bonne foi puisque ce fichier excel ne suffit pas...
La question qui en découle est "pourquoi vouloir protéger ce fichier excel à tous les niveaux" (même s'il est clair que la protection optimale en Excel n'existe pas)?
Parce que de mon point de vue, c'est un client perdu !
Mr Y a beau avoir réussi à copier mon fichier Excel, même s'il pense que cela suffit, je préfère qu'il ne puisse pas l'exploiter pour chercher à l'acquérir plutot que de le laisser dans son ignorance...

Tout ce beau roman, pour revenir au problème central sans réponse, peut-on demander à une macro de scanner un répertoire (C...D..etc ://...System, Mes documents....etc), pour trouver un fichier appelé "X.ddl"...et lui dire si tu ne trouves pas le fichier X.ddl alors ferme le fichier Y.xls...

Je le redis mes connaissances en vba sont quasi nulles, est-il donc possible de réaliser ce genre macro ? Ce principe est-il en terme de logique le bon?

ps : je pense vérouiller mon vba...donc en soit limiter le % de fraudeurs puisque dévérouiller un vba n'est pas donné à tout le monde


Merci pour vos aides, réactions, conseils....

Amicalement

Arnaud

jeanpierre à dit:
Bonsoir à tous,

Après bien des déboires, intenet, disque dur, etc,,,, me revoilà

Quel est donc ce "programme" qui vaut tant pour le protéger et le vendre...???

Pour le vendre, il faut qu'il soit parfait.... et .... et.... les mots me manquent...

Et si le pékin n'active pas les macros... hé...hé... on fait quoi ?

Une appli., c'est pour son propre confort et ceux des gens à qui on la dédit (collègues, amis et même clients quelquefois).

Cette appli. est-elle parfaite au point de.... ?

Bonsoir eet bonne reflexion à vous.

Jean-Pierre
 
Re : Protection contre la copie

Re Arnaud, le forum,

Je ne vais pas réediter, une à une, tes phrases...

Tu parles d'excel et ensuite d'un logicel externe....(enfin interne)...

Quelles explications bienvenues....
"Or c'est faux, Mr Y n'arrivera pas à justifier, aux yeux de l'administration sa bonne foi puisque ce fichier excel ne suffit pas", Je ne comprends.....

Pour la légalité... Expertise-comptable, pour moi.... L'administration, ce n'est pas aux yeux, mais aux oreilles, car souvent au téléphone, pour une case mal cochée, ou un chiffre mal interprété, et nous sommes d'accord, sans souci... sur un simple coup de fil (on pourrait faire une pub là dessus)

A te lire, donc et à te comprendre aussi dans la totalité.

Jean-Pierre
 
Re : Protection contre la copie

Je parle de tracabilité....et dans ce domaine l'administration n'est compétente qu'en cas de déplacement sur le site.
Je pourrai parler des heures de mon secteur, c'est ma passion, mais mon intérêt, et peut-être celui des forumeurs par la même occasion, est de savoir si mon idée est réalisable sur le plan technique....en somme vba me permet-il de réaliser ce genre de macro ? et si c'était le cas, y aurait-il un eminent membre de ce forum dans la capacité de me fournir les codes répondant à ma requêtes ?

Amicalement

Arnaud
 
Re : Protection contre la copie

Re,

Pour honorable qu'elle soit, ton idée n'est pas réalisable sous Excel, ou cela serait un leurre. C'est mon sentiment.

Tu ne peux demander à VBA et dans le même temps l'autoriser à ne pas être... (Ne pas activer les macros, pour le plus simple).

Je ne connais pas ton souci, mais dans un langage de programmation x ou y, tu peux réaliser la même impression qu'un fichier Excel.... mais au travers d'un exécutable.

Sinon, si on sait pas, on fait pas (car ensuite, il faut assumer). Il est dur le papy....

Bonne soirée et à te lire.

Jean-Pierre
 
Re : Protection contre la copie

salut

En lisant ce post, je me pose une question de simple déontologie : tu demandes la collaboration d'un "membre éminent du forum" pour réaliser, à ta place, une interface que toi-même tu ne sais pas réaliser, et je ne doute pas que tu espères que tout ceci soit effectué gracieusement alors que la finalité de ta démarche est d'ordre commercial, ce qui est contraire aux règles de principe d'un forum d'entraide.

Donc 2 remarques :

-quand on commercialise un programme, on se prépare à répondre à tous les problèmes qui ne manqueront pas de se poser en fonction des configurations de nos "clients". Tu feras quoi quand la macro concoctée par le membre éminent plantera ? Tu le solliciteras à nouveau ?

- Plus généralement, tu ne crois pas que tu t'apprêtes à tromper ton client, en lui faisant croire que tu lui vends un programme original, alors qu'il n'est en fait qu'une somme de compétences dont certaines te dépassent totalement et que tu ne maîtrises pas ?

Enfin, n'oublions pas que les protections Office ne sont volontairement destinées qu'à éviter des erreurs de manipulations, c'est ce qui fait qu'elles sont si peu sécurisées.
 
Re : Protection contre la copie

Re

un fil difficile, on y aborde la déontologie....

Pour ma part je trouve la question intéressante, la démarche honnête et j'ai peut-être raté un truc mais je n'ai pas vu de demande de réalisation complète de l'application.

Sauf erreur, la plupart des fils ne sont en relation avec un aspect professionnel. Et on essaie d'y répondre. Qui dit professionnel dit que l'on est payé en retour de son travail (je dois suivre des indicateurs, je réalise un fichier, avec ou sans aide, je suis payé en fin de mois)

Quand à la réalisation d'un fichier original, à part Dieu, les créateurs ne sont pas légion.

En résumé, non à un développement d'appli à la place de mais oui à une réponse à une question précise.

J'adore ce forum🙂
 
Re : Protection contre la copie

Bonjour à tous,

Vraiment intéressant ce fil 😛

Pour répondre à Escobarno,
Tout ce beau roman, pour revenir au problème central sans réponse, peut-on demander à une macro de scanner un répertoire (C...D..etc ://...System, Mes documents....etc), pour trouver un fichier appelé "X.ddl"...et lui dire si tu ne trouves pas le fichier X.ddl alors ferme le fichier Y.xls...
En VBA on peut effectivement aller vérifier si un fichier existe à un endroit.
Mais rien ne peut empècher X de donner le fichier à Y


Je le redis mes connaissances en vba sont quasi nulles, est-il donc possible de réaliser ce genre macro ?
C'est là que je suis interloqué 😱

Vouloir vendre un produit que l'on n'est pas capable de développer soit même, moi j'apelle ça du Vol ...
Oui m'sieur ....


Ce principe est-il en terme de logique le bon?
En terme de logique, oui ! Mais pas avec Excel ...


ps : je pense vérouiller mon vba...donc en soit limiter le % de fraudeurs puisque dévérouiller un vba n'est pas donné à tout le monde
Détrompe toi, c'est devenu pratiquement à la portée de tous ... Malheureusement.

C'était ma pensée du jour 🙄
 
Re : Protection contre la copie

Bonjour à tous

A titre d'illustration
voici un code VBA qui peut t'inspirer (mais qui au final sera facilement inefficace)
(source:VBA Express : Excel - Set a Trial Period For Use of Your Project)

Reste le problème de la non activation des macros par l'utilisateur

Code:
Option Explicit 
 
Private Sub Workbook_Open() 
    Dim StartTime#, CurrentTime# 
     
     '*****************************************
     'SET YOUR OWN TRIAL PERIOD BELOW
     'Integers (1, 2, 3,...etc) = number of days use
     '1/24 = 1Hr, 1/48 = 30Mins, 1/144 = 10Mins use
     
    Const TrialPeriod# = 30 '< 30 days trial
     
     'set your own obscure path and file-name
    Const ObscurePath$ = "C:\" 
    Const ObscureFile$ = "TestFileLog.Log" 
     '*****************************************
     
    If Dir(ObscurePath & ObscureFile) = Empty Then 
        StartTime = Format(Now, "#0.#########0") 
        Open ObscurePath & ObscureFile For Output As #1 
        Print #1, StartTime 
    Else 
        Open ObscurePath & ObscureFile For Input As #1 
        Input #1, StartTime 
        CurrentTime = Format(Now, "#0.#########0") 
        If CurrentTime < StartTime + TrialPeriod Then 
            Close #1 
            Exit Sub 
        Else 
            If [A1] <> "Expired" Then 
                MsgBox "Sorry, your trial period has expired - your data" & vbLf & _ 
                "will now be extracted and saved for you..." & vbLf & _ 
                "" & vbLf & _ 
                "This workbook will then be made unusable." 
                Close #1 
                SaveShtsAsBook 
                [A1] = "Expired" 
                ActiveWorkbook.Save 
                Application.Quit 
            ElseIf [A1] = "Expired" Then 
                Close #1 
                Application.Quit 
            End If 
        End If 
    End If 
    Close #1 
End Sub 
 
Sub SaveShtsAsBook() 
    Dim Sheet As Worksheet, SheetName$, MyFilePath$, N& 
    MyFilePath$ = ActiveWorkbook.Path & "\" & _ 
    Left(ThisWorkbook.Name, Len(ThisWorkbook.Name) - 4) 
    With Application 
        .ScreenUpdating = False 
        .DisplayAlerts = False 
        On Error Resume Next '<< a folder exists
        MkDir MyFilePath '<< create a folder
        For N = 1 To Sheets.Count 
            Sheets(N).Activate 
            SheetName = ActiveSheet.Name 
            Cells.Copy 
            Workbooks.Add (xlWBATWorksheet) 
            With ActiveWorkbook 
                With .ActiveSheet 
                    .Paste 
                     '//N.B. to remove all the cell formulas,
                     '//uncomment the 4 lines of code below...
                     'With Cells
                     '.Copy
                     '.PasteSpecial Paste:=xlPasteValues
                     'End With
                    .Name = SheetName 
                    [A1].Select 
                End With 
                 'save book in this folder
                .SaveAs Filename:=MyFilePath _ 
                & "\" & SheetName & ".xls" 
                .Close SaveChanges:=True 
            End With 
            .CutCopyMode = False 
        Next 
    End With 
    Open MyFilePath & "\READ ME.log" For Output As #1 
    Print #1, "Thank you for trying out this product." 
    Print #1, "If it meets your requirements, visit" 
    Print #1, "http://www.xxxxx/xxxx to purchase" 
    Print #1, "the full (unrestricted) version..." 
    Close #1 
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Retour