Skocz do zawartości


Close Open
Close Open
Zdjęcie

Problem ze skryptem VBA import towarów z Excela do SubiektaGT


  • Please log in to reply
4 replies to this topic

#1 tombien

tombien

    Adept

  • Forumowicze
  • Pip
  • 2 Postów:

Napisany 20 grudzień 2010 - 16:51

Witam wszystkich,

próbowałem utworzyć skrypt w Excelu do importu towarów do Subiekta GT (sfera).
Niestety w pomocy nie ma przykładu na dodawanie towaru, tak jak to jest w przypadku kontrahentów. Poniżej mój skrypt, problem polega na tym, że importuje mi towar tylko z pierwszego wiersza a pozostałych nie i nie wiem co jest nie tak:

Private Sub CommandButton1_Click()
On Error Resume Next

Dim oSubGT As Insert.Subiekt
Dim oTwy As Insert.Towary
Dim oTw As Insert.Towar
Dim row As Integer

row = 5

Set oSubGT = UruchomSubiekta()

While Cells(row, 1).Text <> ""
Set oTwy = oSubGT.Towary
Set oTw = oTwy.Dodaj(1)
If oTw Is Nothing Then MsgBox "oTw Is Nothing"
If Err.Number <> 0 Then GoTo ErrHandler
oTw.Symbol = Cells(row, 1)
oTw.Nazwa = Cells(row, 2)
oTw.Rodzaj = Cells(row, 3)
oTw.Opis = Cells(row, 4)
oTw.Zapisz
row = row + 1
Wend

ErrHandler:
Debug.Print Err.Number & ": " & Err.Description

End Sub


Bardzo prosze o pomoc bo pomysłów mi brak.

#2 birds22

birds22

    Entuzjasta

  • Forumowicze
  • PipPipPipPipPipPipPip
  • 1332 Postów:
  • Płeć:Mężczyzna
  • Lokalizacja:Zduńska Wola

Napisany 20 grudzień 2010 - 22:26

Wywal

oTw.Rodzaj = Cells(row, 3)

to pójdzie.

A na następy raz daruj sobie na początku "On Error Resume Next" to się dowiesz gdzie się wykłada


Sławek

#3 tombien

tombien

    Adept

  • Forumowicze
  • Pip
  • 2 Postów:

Napisany 21 grudzień 2010 - 22:25

Dzięki wielkie, faktycznie to było problemem.

#4 GośćŁukasz_*

GośćŁukasz_*
  • Goście

Napisany 30 grudzień 2011 - 14:45

Dzięki wielkie, faktycznie to było problemem.


witam
walcze od kilku dni z importem towaru z excela - niestety jestem zielony w tym temacie.
kupiliśmy sfere ale z tego co widze to potrzebny jest jeszcze skrypt aby to wszystko zadziałało.
czy jest ktoś z forumowiczów w stanie podesłać gotowy skrypt importujący towary z excela do subiektgt (sfera)?
Proszę o pomoc i kontakt na priv bigluk@poczta.onet.pl

#5 koteG

koteG

    Adept

  • Forumowicze
  • Pip
  • 6 Postów:
  • Płeć:Mężczyzna
  • Lokalizacja:Wrocław, Polska

Napisany 05 listopad 2012 - 12:36

Witam,

Nie chcę tworzyć nowego wątku więc zapytam w tym temacie.
Importowałem towary z excela do subiekta korzystając z metody, którą opisał tutaj fashXX.
Czy jest możliwość analogicznego importu grup towarów tak, aby w subiekcie utworzone zostały komplety?

Pozdrawiam
Michał




0 Użytkowników czyta ten temat

0 użytkowników, 0 gości, 0 anonimowych użytkowników