Příspěvky uživatele


< návrat zpět

Strana:  « předchozí  1 2
Spuštění formuláře na (5.8.2011 23:36)

Díky za radu.
Už to vypadá funkčně

Spuštění formuláře na (5.8.2011 17:49)

Dobrý den,
potřeboval bych poradit, jak spustit, respektive uložit hodnoty z formuláře, pokud tento formulář spustím z jiného listu, než na který chci hodnoty ukládat.

Mám sepsaný tento kód:
Private Sub CommandButton1_Click()
With Sheets("Dodavatele_seznam")
Dim Posledni As Range
Dim Posun As Integer

Res = IfStorno
ufDodavatele.Show
If Res = IfOK Then
ActiveSheet.Unprotect
Posun = Range("polozka0").CurrentRegion.Rows.Count
Set Posledni = Range("polozka0").Offset(Posun, 0).EntireRow
UlozitDodavatele Posledni
Posledni.Cells(1, 1).Activate
ActiveSheet.Protect
End If
Unload ufDodavatele
End With
End Sub

Pokud formulář spustím z listu Dodavatele_seznam, tak funguje, pokud z jiného, tak mi to vypíše:
Run-time error 1004:
Method Range of object_Worksheet failed

Za rady budu vděčný


Strana:  « předchozí  1 2

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje