mam mensi problem s makrom v excely.
potreboval by som tam dopisat funkciu ktora by pustila makro od urciteho riadku
skusal som moznost Run "potvrdenie". toto pustilo makro od zaciaku, slapalo ako malo ale pretiekol zasobnik vyhodilo chybu a spadlo.
najlepsie by bolo nejaka funkcia alebo take nieco co by ho pustilo znovu.
postujem aj kod makra. Rad by som aby sa v makre opakovalo iba cerveno vyznacene
Sub potvrdenie()
Dim Sys, Session, Sess As Object
Dim idx As Integer
Set Sys = CreateObject("EXTRA.System")
Set Session = Nothing
For Each Sess In Sys.Sessions
If Sess.Screen.GetString(1, 2, 8) = "a5558722" Then
If Session Is Nothing Then
Set Session = Sess
Else
MsgBox ("len jedno okno povolene")
Exit Sub
End If
End If
Next Sess
If Session Is Nothing Then
MsgBox ("nemas spravne okno 4.4.3")
Exit Sub
End If
For idx = 1 To Selection.Rows.Count
Session.Screen.SendKeys "<Keypad Enter>"
Session.Screen.SendKeys "<Keypad Enter>"
Session.Screen.SendKeys "<Keypad Enter>"
Session.Screen.SendKeys "<Keypad Enter>"
Session.Screen.SendKeys "<Keypad Enter>"
Session.Screen.SendKeys "<y>"
Session.Screen.SendKeys "<Keypad Enter>"
Session.Screen.SendKeys "<F12>"
Session.Screen.SendKeys "<down>"
If Session.Screen.GetString(17, 1, 13) <> " " Then
Else
MsgBox ("vsetko polozky mas potvrdene, mozes pokracovat")
Exit Sub
End If
Next idx
Application.Run "potvrdenie" -----> ked tu mam toto tak to pretecie ten zasobnik
End Sub
