Trying to create an order sheet
Solved/Closed
                    
        
                    JesterGrafix
    
        
                    Posts
            
                
            2
                
                            Registration date
            Saturday August 27, 2016
                            Status
            Member
                            Last seen
            August 28, 2016
            
                -
                            Aug 27, 2016 at 12:07 PM
                        
vcoolio Posts 1411 Registration date Thursday July 24, 2014 Status Moderator Last seen September 6, 2024 - Aug 29, 2016 at 04:03 AM
        vcoolio Posts 1411 Registration date Thursday July 24, 2014 Status Moderator Last seen September 6, 2024 - Aug 29, 2016 at 04:03 AM
        Related:         
- Trying to create an order sheet
 - Google sheet right to left - Guide
 - Windows network commands cheat sheet - Guide
 - How to create @ in laptop - Guide
 - How to create an instagram story on desktop - Guide
 - Little alchemy cheat sheet - Guide
 
2 responses
                
        
                    vcoolio
    
        
                    Posts
            
                
            1411
                
                            Registration date
            Thursday July 24, 2014
                            Status
            Moderator
                            Last seen
            September  6, 2024
            
            
                    262
    
    
                    
Aug 27, 2016 at 07:52 PM
    Aug 27, 2016 at 07:52 PM
                        
                    Hello JesterGrafix,
Your post is oddly similar to the following:-
https://ccm.net/forum/affich-919767-creating-an-order
so it may be worth having a look at it although the other Poster has multiple sheets.
Anyway, a Worksheet_Change event may do the trick for you also , so, the following code placed in the Inventory sheet module should work :-
Now you can work away in the Inventory sheet and each time that you place a value in any cell in Column G (make sure that this is your last entry per row) and move to the next cell, the relevant row of data will be transferred to the Order sheet.
To implement the code, right click on the Inventory sheet tab and from the menu that appears, select "view code". In the big white field that then appears, paste the above code.
I hope that this helps.
Cheerio,
vcoolio.
            Your post is oddly similar to the following:-
https://ccm.net/forum/affich-919767-creating-an-order
so it may be worth having a look at it although the other Poster has multiple sheets.
Anyway, a Worksheet_Change event may do the trick for you also , so, the following code placed in the Inventory sheet module should work :-
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Value = vbNullString Then Exit Sub
If Intersect(Target, Columns("G:G")) Is Nothing Then Exit Sub
Application.ScreenUpdating = False
        If Target.Value <> "" Then
        Target.EntireRow.Copy Sheet2.Range("A" & Rows.Count).End(3)(2)
        End If
  
Sheet2.Columns.AutoFit
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub
Now you can work away in the Inventory sheet and each time that you place a value in any cell in Column G (make sure that this is your last entry per row) and move to the next cell, the relevant row of data will be transferred to the Order sheet.
To implement the code, right click on the Inventory sheet tab and from the menu that appears, select "view code". In the big white field that then appears, paste the above code.
I hope that this helps.
Cheerio,
vcoolio.
                
        
                    vcoolio
    
        
                    Posts
            
                
            1411
                
                            Registration date
            Thursday July 24, 2014
                            Status
            Moderator
                            Last seen
            September  6, 2024
            
            
                    262
    
    
                    
Aug 29, 2016 at 04:03 AM
    Aug 29, 2016 at 04:03 AM
                        
                    Hello JesterGrafix,
You're welcome. Glad that I could help.
Cheerio,
vcoolio.
            You're welcome. Glad that I could help.
Cheerio,
vcoolio.
        
    
    
    
    

Aug 28, 2016 at 02:57 PM