Mangler et stykke kode
Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=499
Udskrevet den: 05.Dec.2024 kl. 03:37
Emne: Mangler et stykke kode
Besked fra: kbno
Emne: Mangler et stykke kode
Posteringsdato: 21.Okt.2011 kl. 10:07
|
Kort beskrivelse: Jeg ønsker at når man har tastet færdig i række 1 og trykker "Enter" i kolonne "I" at man automatisk
springer til kolonne "B" og samtidig oprettes der et fortløbende ID i kolonne "A" /uploads/183/mangleliste.xls" rel="nofollow">uploads/183/mangleliste.xls Hygge - Kim ------------- Hygge - Kim Excel 365 DK user |
Svar:
Besked fra: Allan
Posteringsdato: 21.Okt.2011 kl. 12:18
|
Hej Kim,
Højreklik på fanen og vælg 'Vis programkode'
Sæt denne kodestump ind:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 9 AND Target.Row > 1 Then Range("B" & Target.Row + 1).Select Range("A" & Target.Row + 1).Value = Range("A" & Target.Row) + 1 End If End Sub Det burde virke
//Allan
|
Besked fra: kbno
Posteringsdato: 24.Okt.2011 kl. 08:11
|
Hej Allan
Endnu engang 10000 tak for hjælpen
  Hygge - Kim ------------- Hygge - Kim Excel 365 DK user |
Besked fra: Allan
Posteringsdato: 24.Okt.2011 kl. 08:37
|
Velbekomme Kim, fedt at du kunne bruge det. //Allan
|