Jeg har arbejdet på et regneark, som bruges i skoleregi.
I hvert ark har jeg lavet det sådan, at der øverst kommer navne på den pågælende elev. Dette henstes fra en oversigt, hvor man kan kopiere navne ind fra et andet program.
Jeg ville gerne at navnet på arket, også blev navnet på eleven, uden at jeg skal til at skrive det selv. At det bare kopiere værdien af en bestemt celle i arket.
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Intersect(Target, Sh.Range("A1")) Is Nothing Then Exit Sub If Sh.Range("A1").Value <> "" Then ActiveSheet.Name = Sh.Range("A1").Value End Sub
Hvis den ikke trikker på dette, så skal du anvende en kode i et alm. modul, hvor til du tildeler en genvejs-tast som du så kører koden med...sig til hvis....
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!
Du kan ikke oprette nye emner i dette forum Du kan ikke besvare beskeder i dette forum Du kan ikke slette dine beskeder i dette forum Du kan ikke redigere dine beskeder i dette forum Du kan ikke oprette afstemninger i dette forum Du kan ikke stemme i dette forum
Forum start
Forummets regler
Sådan uploader du filer
Marker Accepteret løsning
Del dine regneark
Excel-regneark.dk
Navn på ark
Emne funktioner
