Tricky function for a VBA newbie -

-

here's problem. need compare 2 sets of cells on 2 different worksheet.

on sheet 1, cells a1 , a2. on sheet 2, cells a1 , a2.

on sheet 1, each cells populated single digit number, 1 being greater other, eg: 1-2, 2-1, 3-1, etc. , never equal another.

on sheet 2, 1 of cell populated single digit number. other cell empty.

i need determine if non empty cell on sheet 2 same cell cell on sheet 1 containing greater number.

unfortunatly have next 0 knowledge of vba, trying learn tutorial can't seem figure out how write one. me please?

thank much.

sub doit()     dim sh1 worksheet, sh2 worksheet     set sh1 = worksheets("first")     set sh2 = worksheets("second")     dim ivalue1 long     if sh1.cells(2, 1) > sh1.cells(1, 1)         ivalue1 = sh1.cells(2, 1)     else         ivalue1 = sh1.cells(1, 1)     end if     dim ivalue2 long     if len(sh2.cells(2, 1)) = 0         ivalue2 = sh2.cells(1, 1)     else         ivalue2 = sh2.cells(2, 1)     end if     if ivalue1 = ivalue2         msgbox "equal"     else         msgbox "different"     end if end sub

Comments

Post a Comment

Popular posts from this blog

windows - Single EXE to Install Python Standalone Executable for Easy Distribution -

-
i used pyinstaller create standalone exe file pyqt project. did not use single file option because exe created single file option takes long open. therefore, pyinstaller created dist folder contains bunch of files including program.exe file. create setup.exe file place contents of dist folder in program directory , create shortcut in start menu , on desktop. want super simple user. maybe setup.exe files when download program cnet. found inno-setup, looks promising. however, not know if there special considerations because program standalone program create python/pyqt program. thanks! have experience task? there program using task not know about? inno-setup or nsis easiest use. tell them files include , put them , create nice installer you. wrote short tutorial on experiences using innosetup might find helpful: http://www.blog.pythonlibrary.org/2008/08/27/packaging-wxpymail-for-distribution/ note tutorial based around wxpython app wrote, concepts same.
Read more

c# - Access objects in UserControl from MainWindow in WPF -

-
i have simple xaml, how can change text property of textblock in usercontrol1 mainwindow ? <window x:class="refactorxaml.mainwindow" xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" xmlns:refactorxaml="clr-namespace:refactorxaml" title="mainwindow" height="350" width="525"> <grid> <grid.rowdefinitions> <rowdefinition height="100"></rowdefinition> <rowdefinition height="100"></rowdefinition> </grid.rowdefinitions> <grid> <refactorxaml:usercontrol1></refactorxaml:usercontrol1> </grid> <grid grid.row="1"> <button>change text</button> </grid> </grid> </window> <usercon...
Read more

javascript - How to name a jQuery function to make a browser's back button work? -

-
i'm trying write function ajaxyfy web site, works perfect, except function button. that's have now: function loading() { if (typeof history.pushstate !== "undefined") { var historycount = 0; $('.menu-item, .logo').on('click','a',function(e){ e.preventdefault(); $(this).data('clicked', true); if ($(this).is('.logo a')) { var homepage = $(this).attr('href'); function1(homepage); history.pushstate(null, null, homepage); } else if ($(this).is('.projects a')) { var projects = $(this).attr('href'); function2(projects); history.pushstate(null, null, projects); } else { var pages = $(this).attr('href'); function3(pages); history.pushstate(null, null, pages); ...
Read more