Selectie copieren naar andere tabel

[onnokramer]

In het meegestuurde excel bestand staat een tabel met (bijvoorbeeld) 40 rijen in twee kolommen van x en y.
In de kolom y ontbreken soms waardes.
De kolom heb ik nu handmatig gekopieerd naar een tabel rechts zonder lege y waardes zodat met een polynoom de coëfficiënten bepaald kan worden.

Kan zonder macro's te gebruiken dit automatisch gebeuren?

 

[VenA]

Je kan eens kijken naar het geavanceerd filter.

 

[onnokramer]

Ok dat kan natuurlijk
Maar dan moet je een handmatige handeling doen
Ik zoek een methode die dit automatisch doet
Kan dat?

 

[HSV]

Met een macrootje.

Sub hsv()
 Range("m1:n1") = Range("b2:c2").Value
 Range("n2") = "<>"
 Cells(2, 2).CurrentRegion.AdvancedFilter 2, Cells(1, 13).CurrentRegion, Cells(5, 13)
 Cells(1, 13).CurrentRegion.ClearContents
End Sub

je moet helaas nog wel op een knopje drukken of wat dan ook.

 

[VenA]

Kan zonder macro's te gebruiken dit automatisch gebeuren?

:d Lekker helder.

 

[plongske]

met een hulpkolom

 

[onnokramer]

Super goede oplossing. Bedankt!
Ik heb het bestand even verder uitgewerkt waarbij je vrij kan invullen zodat de polynoom steeds uitgerekend blijft worden.
Nu staan er in het voorbeeld 4 getallen waarbij de lijnschatter ook 4 gebruikt. Bij het veranderen van de y kolom past de lijnschatter deze niet automatisch aan. Nu wel.

 

[plongske]

Die hulpkolom kan je ook verbergen.

 

[onnokramer]

Goede tip, bedankt.
groet Onno