Új hozzászólás Aktív témák

• #46403 Telda addikt

  Új Válasz 2021-04-08 09:09:45 #46403

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Telda

  addikt

  Sziasztok!
  SAP-hoz készítettem egy makrót.
  Az lenne a problémám, hogy azoknak a celláknak a tartalmát amik szóközt tartalmaznak, feldarabolja a makró.
  Ezt kellene minden megnevezéshez beírni.
  MARCHÉ FRESH L2H.125 A4
  Helyette viszont szóközönként szétvágva másolja be.
  Szerintem a parancs sorban lévő résszel van valami baj.

  

  Sub ujcikk()

Dim ProgramVbs: Set ProgramVbs = CreateObject("WScript.Shell")

fajl = ActiveWorkbook.Name

utVbs = "d:\SAP_MACRO\NEW_NUMBER_HALB.vbs"

maxsor = Cells(Rows.Count, 1).End(xlUp).Row

For i = 2 To maxsor

minta = Cells(i, 1).Value
tipus = Cells(i, 2).Value
angol = Cells(i, 3).Value
cseh = Cells(i, 4).Value
nemet = Cells(i, 5).Value
magyar = Cells(i, 6).Value

parancs = """" & utVbs & """ " & minta & " " & tipus & " " & angol & " " & cseh & " " & nemet & " " & magyar

futVbs = ProgramVbs.Run(parancs, , True)

Next i

MsgBox "Keszen vagyunk"

End Sub

  A változók a SAP scriptben vannak deklarálva.

  Dim minta
Dim tipus
Dim angol
Dim cseh
Dim nemet
Dim magyar

On Error Resume Next

minta = wscript.arguments(0)
tipus = wscript.arguments(1)
angol = wscript.arguments(2)
cseh = wscript.arguments(3)
nemet = wscript.arguments(4)
magyar = wscript.arguments(5)

Új hozzászólás Aktív témák