Copier/coller de formule

Version imprimable

21/08/2012, 15h49
folledebrune

Copier/coller de formule

Bonjour à tous, :D

Je suis en train de créer un programme de dimensionnement sur excel avec VBA et je voudrais savoir s'il était possible d'entrer toute les formule sur excel et ensuite de les importer dans les feuilles de programmations VBA comme une sorte de copier coller avec une formule.

Ou es ce que je suis obiligée de rentrer toutes mes formules de dimensionnement sur les feuilles de programmations?
J'ai cherché sur les tutoriaux mais je n'ai pas trouvé ce que je cherchais.

Si quelqu'un pouvais m'aider ça me sauverais la vie parce que pour l'instant mon logiciel est programmé directement sur les feuilles excel et ça voudrais dire que je doit tout recommencer... :(

Merci.

Je ne vois pas l’intérêt (Si tu voulais bien expliciter ton besoin).

Sinon, pour répertorier toutes les formules dans Feuil1, le code suivant indique l'adresse de chaque cellule contenant un formule et la formule qui y est inscrite.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Sub FormulaTranscription()
Dim Tb() As String
Dim i As Long, k As Long
Dim Plage As Range, c As Range
 
On Error Resume Next
Set Plage = Feuil1.UsedRange.SpecialCells(xlCellTypeFormulas)
On Error GoTo 0
 
If Not Plage Is Nothing Then
    For Each c In Plage
        k = k + 1
        ReDim Preserve Tb(1 To 2, 1 To k)
        Tb(1, k) = c.Address
        Tb(2, k) = c.Formula
    Next c
    Set Plage = Nothing
    For i = 1 To k
        Debug.Print "Formule: " & Tb(2, i) & "  dans la cellule: " & Tb(1, i)
    Next i
End If
 
End Sub

21/08/2012, 17h53
folledebrune

D'accord merci beaucoup je vais essayer ça et si ça ne marche pas j'ai trouvé qqun qui a fait presque la même chose que moi comme logiciel je lui demanderais de l'aide.