26. november 2002 - 20:09Der er
6 kommentarer og 1 løsning
Find rækkenummer på markeret område
Jeg ved hvordan man finder kolonne nummeret, men hvordan finder man første og sidste række nummer i et markeret område. ver.excel 97
FR(I) = Selection.Areas(I)(Selection.Areas(I).Rows.Count).Row LK(I) = Selection.Areas(I)(Selection.Areas(I).Columns.Count).Column FK(I) = LK(I) - ((Selection.Areas(I).Columns.Count) - 1) LC(I) = Selection.Areas(I).Rows.Count FC(I) = LC(I) - R i dette tilfælde finder jeg kolonnerne og hvor mange rækker, men jeg mangler rækkenumrene, ( første eller sidste).
Brug af AI afslører de svagheder, virksomheder allerede har opbygget gennem års cloud-transformation, nye SaaS-løsninger og fragmenterede sikkerhedssystemer.
Jeg sad lige og tænkte mig en funktion der gjorde det :-) Denne funktion returner en variant med alle 4 oplysninger. første kolonne, første række, sidste kolonne og sidste række i et hug.
Function RangeRowColumns(rtest As Range) As Variant Dim st As String Dim x As Integer st = rtest.Address st = Replace(st, ":", "") RangeRowColumns = Split(st, "$") End Function
Sub test_ny_funktion() Dim var Dim x As Integer var = RangeRowColumns(Selection) For x = 1 To UBound(var) Debug.Print var(x) Next End Sub
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.