wie eine Excel-Formel in eine VBA transformé cdoe

Question

I

For i = 1 To table1Rows 
table1(i + 1, 28) 
table1(2, 28)= SI(W2="OK";GAUCHE(A2&"";12)&";"&B2& ";"&AN2& ";"&Q2& ";"&GAUCHE(D2&" ";20)&";"&TEXTE(C2;"JJ/MM/AAAA")&";"&DROITE(""&TEXTE(AX2;"0,000000");16)&";"&DROITE(""&TEXTE(AP2;"0,00");12)&";"&DROITE(""&TEXTE(AR2;"0,00");12)&";"&DROITE(""&TEXTE(AT2;"0,00");12)&";"&AU2& ";"&AV2& ";";"") 

Answer 1

1. Markieren Sie die Zelle mit der Formel in Excel diese Excel-Formel in ein VBA-Code transformé möchten.

2. Führen Sie den Code:

   Option Explicit 
   
   Public Sub PrintMeUsefulFormula() 
   
       Dim strFormula As String 
       Dim strParenth As String 
   
       strParenth = """" 
   
       strFormula = Selection.FormulaLocal 
       strFormula = Replace(strFormula, """", """""") 
   
       strFormula = strParenth & strFormula & strParenth 
       Debug.Print strFormula 
   
   End Sub 
   

3. die sofortigen Fenster.

4. Senden Sie mir ein virtuelles Bier.