Application i Range

Tags: vba range application

Bruger #17748 @ 20.04.14 16:02

Hej!

Jeg har brug for lidt hjælp til vba.

Jeg har det problem, at jeg skal tjekke om den valgte celles række er større end en navngivet celle.
Den navngivet celle består af de 4 første bogstager af mappens navn, samt "FirstCell"

If Selection.Row > Range(WorksheetFunction.Left _
(ActiveSheet.Name, 4) & "FirstCell").Row Then
MsgBox "Can't inset a line here"

Er der nogen der kan fortælle mig, hvad jeg gør galt her?

Håber I kan hjælpe mig.
På forhånd tak.

Venlig hilsen
Anders

1 svar postet i denne tråd vises herunder
0 indlæg har modtaget i alt 0 karma

Sorter efter stemmer Sorter efter dato

Bruger #14645 @ 20.04.14 16:58

806

Det virker fint her, hvis jeg bruger Left direkte:

VBDotNet kode

 Private Sub CommandButton1_Click()
     If Selection.Row > Range(Left("Sovs", 3) & "s").Row Then
         MsgBox ("Virker")
     End If
 End Sub

Karma barometer (30 dage)

Modtaget

Givet

Favorit hos
Forum tråde
Artikler