Pitäisi saada kyseiseen pätkään sellainen toiminto että jos luku (B9) onkin jo kyseisessä taulukossa niin antaa jonkun "herjauksen" eikä siirrä ko. lukua kyseiseen taulukkoon.
Private Sub CommandButton1_Click()
Range("B9").Select
Selection.Copy
Sheets("39").Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
, Transpose:=False
Application.CutCopyMode = False
Selection.Insert Shift:=xlDown
Sheets("Syöttö").Select
Range("B9").Select
ActiveCell.FormulaR1C1 = ""
Range("B9").Select
End Sub
Apuja kaivataan
Nappo
2
673
Vastaukset
ois siihen yksi vaihtoehto.
Private Sub CommandButton1_Click()
Dim huom
If Sheets("39").Range("e29") = Range("b9") Then
huom = MsgBox("Luku on jo olemassa", vbOKOnly, "Huom!!")
End
End If
Range("B9").Select
Selection.Copy
Sheets("39").Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
, Transpose:=False
Application.CutCopyMode = False
Selection.Insert Shift:=xlDown
Sheets("Syöttö").Select
Range("B9").Select
ActiveCell.FormulaR1C1 = ""
Range("B9").Select
End Sub- koodiin
näyttäis tulleen yksi pieni virhe. Alkuperäinen koodi kopioi taulukosta "Syöttö" solun ("b9") taulukon 39 valittuun soluun ja siirtää luvun sen jälkeen yhden rivin alaspäin ja tyhjentää sen jälkeen ensin mainitun solun.
Herjauksen saa toimimaan, kun määrittää tuohon iffiin taulukosta 39 valitusta solusta yhden solun alaspäin. Ilmeisesti neuvojalla on ollut valittuna solu ("e28")
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Olen tosi outo....
Päättelen palstajuttujen perusteella mitä mieltä minun kaipauksen kohde minusta on. Joskus kuvittelen tänne selkeitä tap162178Kotkalainen Demari Riku Pirinen vangittu Saksassa lapsipornosta
https://www.kymensanomat.fi/paikalliset/8081054 Kotkalainen Demari Riku Pirinen vangittu Saksassa lapsipornon hallussapi842128- 1011397
Vanhalle ukon rähjälle
Satutit mua niin paljon kun erottiin. Oletko todella niin itsekäs että kuvittelet että huolisin sut kaiken tapahtuneen101306Maisa on SALAKUVATTU huumepoliisinsa kanssa!
https://www.seiska.fi/vain-seiskassa/ensimmainen-yhteiskuva-maisa-torpan-ja-poliisikullan-lahiorakkaus-roihuaa/1525663841207Hommaatko kinkkua jouluksi?
Itse tein pakastimeen n. 3Kg:n murekkeen sienillä ja juustokuorrutuksella. Voihan se olla, että jonkun pienen, valmiin k1461188Aatteleppa ite!
Jos ei oltaisikaan nyt NATOssa, olisimme puolueettomana sivustakatsojia ja elelisimme tyytyväisenä rauhassa maassamme.249896Omalääkäri hallituksen utopia?
Suurissa kaupungeissa ja etelässä moinen onnistunee. Suuressa osassa Suomea on taas paljon keikkalääkäreitä. Mitenkäs ha173874- 78869
- 63854