• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Určení koordinát

Zaslal/a kolokol 5.5.2009 14:16

Oblast= Application.InputBox("Označ oblast", Type:=8)
Potřebuju určit řádek a sloupec levé horní buňky Oblasti. Radek = ... , Sloupec = ...
Dosadí někdo, prosím ?

Zaslat odpověď >

---

kolokol(5.5.2009 18:27)#000506

Milý kolokole, to musíš Oblast deklarovat as Range, pak Set Oblast = ..., nikoliv jen Oblast = ...
No a pak už bude fungovat to, co předtím fungovat nechtělo : Radek = Oblast.Row, Sloupec = Oblast.Column

Díky kolokole za radu, seš dobrej citovat

admin(5.5.2009 19:17)#000507

Sub oblast()

Dim myRange As Range
Dim FirstCell, LastCell As Range

Set myRange = Application.InputBox(prompt:="Select a cell", Type:=8)

With myRange
Set LastCell = .Cells(.Cells.Count)
Set FirstCell = Cells(.Row, .Column)
End With

End Subcitovat

kolokol(6.5.2009 21:04)#000508

Díky za rozvedení odpovědi citovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse