vba - Insert new row and sort automatic in Excel -


i have table in excel list of names linked data. able create new rows (with data form-alike) , have them sorted existing rows.

i don't know how code vba in excel , can't find examples insert rows based on data. examples insert new blank rows style table.

i've got insert new row input value of user: 

sub test_function() dim val string val = inputbox("enter name", "may know name!")  'inserting row @ at row 2 range("a3").entirerow.insert range("a3").formula = val ' end sub

more information: data in lay-out: name - money provided w1 - money providedw2 - drinks w1 - drinks w2 - total money owed

when entering new name, row needs copy formulas other rows. @ bottom of sheet row sum of 'money provided' , 'money owed'. (i think therefore can't add last row, rather insert new one, not sure tho...)

i wouldn't insert new row, rather put results of insertion @ end of sheet: 

lastrow = range("a1").end(xldown).row + 1 range("a" & lastrow) = data1 range("b" & lastrow) = data2 'etc.

and sorting whole sheet key prefer (this example sorting a-c in descending order column - recorded macro): 

    columns("a:c").select     activeworkbook.worksheets("sheet1").sort.sortfields.clear     activeworkbook.worksheets("sheet1").sort.sortfields.add key:=range("a1:a" & lastrow), _         sorton:=xlsortonvalues, order:=xlascending, dataoption:=xlsortnormal     activeworkbook.worksheets("sheet1").sort         .setrange range("a1:c" & lastrow)         .header = xlguess         .matchcase = false         .orientation = xltoptobottom         .sortmethod = xlpinyin         .apply     end

Comments

Post a Comment

Popular posts from this blog

jquery - How do you format the date used in the popover widget title of FullCalendar? -

Image
in fullcalendar, how format date used in popover widget title when clicking '+n more'? code: <div class="fc-popover fc-more-popover"> <div class="fc-header fc-widget-header"> <span class="fc-close fc-icon fc-icon-x"></span> <span class="fc-title">tuesday, april 7</span> ... </div> ... </div> you use daypopoverformat that. determines date format of title of popover created eventlimitclick option. must date formatting string. default value "dddd, mmmm d" english , "ll" other languages.
Read more

asp.net mvc - SSO between MVCForum and Umbraco7 -

i need integrate sso between mvcforum (forum of company) , umbraco7 (manages cms company). however struggling shared authentication work. tried several ways suggested on other threads still not running expected. here did: 1. in mvcforum (forum.mywebsite.com) 1.1. machine key in web.xml: <machinekey validationkey="the same key umbraco7" decryptionkey="the same key umbraco7" validation="sha1" decryption="aes" /> 1.2. authenticate forms in web.xml <forms name="my-sso-auth" protection="all" path="/" timeout="43200" domain="forum.mywebsite.com" loginurl="/members/logon" enablecrossappredirects="true" /> 2. in umbraco7 (news.mywebsite.com) 2.1. machine key in web.xml: <machinekey validationkey="the same key mvcforum" decryptionkey="the same key mvcforum" validation="sha1" decryption="aes" /> 2.2. a...
Read more

Python Tkinter keyboard using bind -

i have problem using bind option can click button in keyboard, , call function once key pressed. tried taking other codes have similar purpose , saw i'm doing pretty same, though still have problem must've missed. thankful if me this. here's code: # -*- coding: utf-8 -*- #imports tkinter import * pil import imagetk, image import time import tkmessagebox #===========================================================================================================================================# #tkinter class class app(frame): def __init__(self, master=none): frame.__init__(self, master) self.pack() #===========================================================================================================================================# #game pieces classes class board: def __init__(self, rows = 7, columns = 6, picture_height = none, picture_width = none): self.rows = rows self.columns = columns self.picture ...
Read more