How to enter a row when an "if condition" is met
Closed
El Magnifico
-
12 Aug 2015 à 06:07
vcoolio Posts 1411 Registration date Thursday 24 July 2014 Status Contributor Last seen 6 September 2024 - 12 Aug 2015 à 08:00
vcoolio Posts 1411 Registration date Thursday 24 July 2014 Status Contributor Last seen 6 September 2024 - 12 Aug 2015 à 08:00
Related:
- Excel insert row if condition met
- Saints row 2 cheats - Guide
- Insert key on keyboard - Guide
- Excel mod apk for pc - Download - Spreadsheets
- Insert check mark in word - Guide
- Insert link gmail app - Guide
1 response
vcoolio
Posts
1411
Registration date
Thursday 24 July 2014
Status
Contributor
Last seen
6 September 2024
262
12 Aug 2015 à 08:00
12 Aug 2015 à 08:00
Hello El Magnifico,
Something like this should get you started at least:-
You can have a look at my test work book at the following link:-
https://www.dropbox.com/s/ggro8uwtxtey6ym/El%20Magnifico.xlsm?dl=0
The code filters Column F for the criteria "Yes" and transfers the relevant row of data to sheet 2. Click on the "Transfer" button to see it work.
I hope that this helps.
Cheerio,
vcoolio.
Something like this should get you started at least:-
Sub CopyIt()
Application.ScreenUpdating = False
With ActiveSheet
.AutoFilterMode = False
With Range("F1", Range("F" & Rows.Count).End(xlUp))
.AutoFilter 1, "Yes"
On Error Resume Next
.Offset(1).EntireRow.Copy
Sheet2.Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlPasteValues
End With
.AutoFilterMode = False
End With
Sheet2.Columns.AutoFit
Application.CutCopyMode = False
Application.ScreenUpdating = True
Sheet2.Select
End Sub
You can have a look at my test work book at the following link:-
https://www.dropbox.com/s/ggro8uwtxtey6ym/El%20Magnifico.xlsm?dl=0
The code filters Column F for the criteria "Yes" and transfers the relevant row of data to sheet 2. Click on the "Transfer" button to see it work.
I hope that this helps.
Cheerio,
vcoolio.
