19. januar 2008 - 10:52Der er
5 kommentarer og 1 løsning
Indsæt række i et interval der hvor markøren er placeret
jeg har et ark hvor der er 10 kolonner. arket er ligesom delt i to ligesom en avis. Når brugeren placere markøren f.eks. i række 12, så skal jeg have indsat en række i de første 5 kolonner. Det eksisterende indhold skal rykke nedad. indholdet i de resterende kollonner skal ikke flyttes. Tilsvarende skal jeg have mulighed for at indsætte i de sidste 5 kolonner uden at de første flyttes. Hvordan løser jeg det smartest? ved et dobbeltklik i cellen hvor der skal indsættes?
De fleste virksomheder har efterhånden bevist, at AI virker.
Pilotprojekter leverer resultater. Medarbejdere bruger generative AI-værktøjer. Nye use cases dukker op på tværs af organisationen.
ja dobbletklik er et godt valg: koden forudsætter du anvender A til J
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column < 6 Then Range("A" & Target.Row & ":E" & Target.Row + 5).Insert Shift:=xlDown Else Range("F" & Target.Row & ":J" & Target.Row + 5).Insert Shift:=xlDown End If End Sub
Hov læste forkert, det var 1 linie men i 5 kolonner
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column < 6 Then Range("A" & Target.Row & ":E" & Target.Row).Insert Shift:=xlDown Else Range("F" & Target.Row & ":J" & Target.Row).Insert Shift:=xlDown End If End Sub
Hej excelent Kan koden ændres, således at den også virker hvis mit worksheet er shared?
Synes godt om
Ny brugerNybegynder
Din løsning...
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.