Dear All
I am designing a user form but new to this, so i need help on prgramming.
The logic i am mentioning here as under:
Threre are 2 comboBoxes, one calender, and amount file.
What i want
1. Which date i would select that should show in Label4
2. First i would select an Type from ComboBox1("
Dear Ali,
Thanks for posting question.
I think you are missing spaces during the concatenation of strings.
Please refer to below code. It should work. Let us know if any further
assistance is required.
Sub Ali()
Dim lastrow As Integer
lastrow = Sheets(1).Range("E100").End(xlUp).Row
Sheets(1)
Hello,
I would love to know from some guru an easiest way to do the
following;
I am making an automation with the help of Macros, I stuck on the
following point.
Through the macro I want to copy a range of data from one sheet [POF]
to another [Order].
Range("E24:O20")
but not simple as this, t
I need for the same records to stay together. rows 2 thru 8, rows 10
thru 16, rows 18 thru 24, rows 26 thru 32 and so on... Once a record
is completed, then delete, and then more everything up. Thanks so much
for your help!
On Dec 5, 8:26 pm, Ken Roedel wrote:
> Try this
>
> Sheet1.Columns(2)
I can't get it work, it only returns N/A. I uploaded a sample...
https://docs.google.com/leaf?id=0B0xyGw0Frro6Y2IzNTY4ZTUtOTU3Yi00NzE3LTk0ZmItYjliMDlkNGM2YTlh&sort=name&layout=list&num=50
On Dec 5, 3:38 pm, Marcus wrote:
> Hi
> I have VBA problem I hope you can help me with.
> I have a two array
In B1
=INDIRECT("A"&COLUMN(A1))
regards
r
2010/12/6 0 1
> The source document (sample.xls) contains these data:
>
> A
> 1
> 2
> 3
> 4
>
> In my destination workbook, I would like to put a reference in A1 so
> when I copy the formula into B1, C1, etc., I get this:
>
> A 1 2 3 etc.
>
> Instead
Let's take a look at this for a minute.
In Column A you have:
1 Heading
2 10
3 20
4 30
5 40
Now, in row 1, column 2 (Cell B1)
You want the contents of Cell A2
C1 = A3
Now, if we were to describe the RELATIONSHIP between these cells,
we could say that the COLUMN number of cell B1 is equal t
Hello,
Not tested :
Sub InfoGetter()
'
' InfoGetter Macro
'
Dim strPath As String, txt As String, strFile As String
Dim lgRow As Long
strPath = "W:\Drywall\Wages\Labour Reccys"
Set sh = Workbooks("Book2").ActiveSheet
strFile = Dir(strPath & "\*.xls")
Do While strFile <> ""
Sorry, I did not test that part of the code - nor did you ;-))
Sub Go2sheet()
myShts = ActiveWorkbook.Sheets.Count
For i = 1 To myShts
myList = myList & i & " - " & ActiveWorkbook.Sheets(i).Name & " " & vbCr
Next i
Dim mySht
mySht = InputBox("Select sheet no to copy data for report." & vbCr & vbCr
Hello.
Maybe :
Columns(Day(Date)).Select
Regards.
Daniel
-Message d'origine-
De : excel-macros@googlegroups.com [mailto:excel-mac...@googlegroups.com] De
la part de Rajesh K R
Envoyé : lundi 6 décembre 2010 17:26
À : excel-macros
Objet : $$Excel-Macros$$ Select the next cell when the page
Hi please help as this will save me loads of time
I just recorded this macro but what I need it to do is pick the same
set of info from different weekly sheets labled as the date in yymmdd
format so for example I want this to start at 081031 and carry on to
101210 copying the range ("C136:DO136")
Hi Experts
I am using an excel sheet for attendance marking sheet have 31 columns
for each day.
if i mark the attendance up to 5th , i want to get select the column
for 6th day automatically when i open the page.how can write the code
1 a b c d e f
2 1 2 3 4 5 6
3 x x x x x
4 x x x x x
Thanks
hi Danial
Thanks for ur reply
i tried ur code but it shows other error (subscript out of range) when
selecting the page.
pls tell me how to solve it.
Regards
Rajesh
On 12/6/10, Daniel wrote:
> Hello,
> Try :
>
> Sub Go2sheet()
> myShts = ActiveWorkbook.Sheets.Count
> For i = 1 To myShts
> myLis
The source document (sample.xls) contains these data:
A
1
2
3
4
In my destination workbook, I would like to put a reference in A1 so
when I copy the formula into B1, C1, etc., I get this:
A 1 2 3 etc.
Instead I get:
A 0 0 0 etc.
I've tried every variation of =sample.xls!$A$1 and none of
replace Range("A1:B334") with Selection
regards
r
2010/12/6 vebhav jain
> Hi All,
>
> I am facing error when the range data changes from (B334) and i need to
> adjust manually the total number, so can you suggest any better way.
>
>
>
>
>
> Thanks,
> Vebhav
>
> --
>
> -
Do you have other data beyond row 334?
Is there any reason you can't sort A1:B65000 ??
Paul
>
>From: vebhav jain
>To: excel-macros@googlegroups.com
>Sent: Mon, December 6, 2010 8:41:14 AM
>Subject: $$Excel-Macros$$ Error in Code
>
>Hi All,
>
>
>I am facing error when the range data changes fr
Hi All,
I am facing error when the range data changes from (B334) and i need to
adjust manually the total number, so can you suggest any better way.
Thanks,
Vebhav
--
--
Some important links for excel users:
1.
Hope this helps -->
http://www.excelitems.com/2009/03/access-search-engines-on-browser.html.
Thanks & Regards
Ashish Jain
(Microsoft Certified Application Specialist)
(Microsoft Certified Professional)
http://www.excelitems.com
http://www.openexcel.com
__
Alternatively, you can reference the Microsoft Internet Controls library
from the VBA IDE and use the methods and props of ShDocVw.InternetExplorer
application object to navigate around.
-Ken
On Mon, Dec 6, 2010 at 1:01 AM, kanwaljit Singh wrote:
> Thanks,
>
> I am trying to fill info into a we
Hi Neil,
Attched file is solved per your requirements.
Best Regards,
DILIPandey
On Sat, Dec 4, 2010 at 7:34 PM, neil johnson wrote:
> Hi Dilip,
>
> You grab my question, I need the second value of harmeet in the below cell.
>
>
>
>
> On Sat, Dec 4, 2010 at 3:19 PM, Dilip Pandey wrote:
>
>> Hi
Hi,
Use, in Sheet1!B1 :
=INDEX(Sheet2!$B$1:$B$20,MATCH(1,IF(ISERR(SEARCH(Sheet2!$A$1:$A$20,A1)),0,1)
,0),1)
And copy downwards as far as needed.
HTH
Daniel
-Message d'origine-
De : excel-macros@googlegroups.com [mailto:excel-mac...@googlegroups.com] De
la part de Marcus
Envoyé : dimanche 5
Hello,
Try :
Sub Go2sheet()
myShts = ActiveWorkbook.Sheets.Count
For i = 1 To myShts
myList = myList & i & " - " & ActiveWorkbook.Sheets(i).Name & " " & vbCr
Next i
Dim mySht
mySht = InputBox("Select sheet no to copy data for report." & vbCr & vbCr &
myList)
If Not IsNumeric(mySht) Then Exit Sub
S
Hi Ashish,
i want one small info again in provided macro
if i hide the Master sheet macro is not running, is there any way to hide
the Master sheet and run the macro successfully?
thanks in advance
Regards
Girish.
On Tue, Nov 30, 2010 at 7:05 PM, ashish koul wrote:
> its ok bro
>
>
> On Tue
23 matches
Mail list logo
