Print side | Luk vindue

Sidder fast i en marko eller hvad der skal til

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Generelt
Forum beskrivelse: Hjælp til generel daglig brug af programmet Excel
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=735
Udskrevet den: 21.Maj.2024 kl. 11:10


Emne: Sidder fast i en marko eller hvad der skal til
Besked fra: work4you
Emne: Sidder fast i en marko eller hvad der skal til
Posteringsdato: 02.Apr.2012 kl. 16:14
Hej Vidunderlig forum 
uploads/534/Pris_Udregning_ny.xlsm - uploads/534/Pris_Udregning_ny.xlsm
mangler hjælp til marko eller andet ved ikke hvad jeg skal bruge.
mit problem er jeg får data i ark udregning, de felter hvor der bliver skrevet i
skal flytter til fanen udskrift.
 
Altså således at hvis der er tastet i celle række3, række10, række20 i ark udregning
skal de vises på ark udskrift.
således at hvis der er data i række 3 til 150 ark henholdsvis koloner type; antal;benævelse; salg pris netto.udregning skal den finde rækkerne
og flytte dem til ark udskrift. type;antal;benævenlse;pris.
 
På forhånd tak
 


Svar:
Besked fra: rassten
Posteringsdato: 03.Apr.2012 kl. 02:44
Denne vil virke, hvis der stod noget i kolonne C

Sub a_test()

lr1 = Worksheets("Udskrift").Cells(Rows.Count, 2).End(xlUp).Row
lr2 = Worksheets("Udregning").Cells(Rows.Count, 2).End(xlUp).Row

If lr2 > 2 Then
    lr1 = lr1 + 1
    Worksheets("Udregning").Activate
    For i = 2 To lr2
        If Range("B" & i) <> "" Then
            Range("A" & i & ":" & "D" & i).Copy Destination:=Worksheets("Udskrift").Range("A" & lr1)
            lr1 = lr1 + 1
        End If
    Next
End If

End Sub

Men der står ikke noget i kolonne C.
Du har lagt en masse kontrol rullemenuer i kolonne C, og det ser excel ikke som celleværdi, derfor kan en makro ikke virke. Havde du i stedet  brugt "datavalidering" havde du ikke haft et problem.


-------------
VH rassten

Arbejde excel 2010
Privat excel 2010

Besked fra: work4you
Posteringsdato: 03.Apr.2012 kl. 10:28
Hej tak for svar kan du hjælpe med det problem?
Og hvor sætter jeg den kodestump ind du har lavet?
jeg er ikke så habil med makro og vba.
Håber du vil hjælpe.

Besked fra: work4you
Posteringsdato: 03.Apr.2012 kl. 10:34
Hej rassten
datan som skal flyttes er i kolonne A - B - H hvis der er indtastet noget i rækken.
hvis der er skal det flyttes til udskrivning.
Håber du forstår
 


Print side | Luk vindue