rng =OFFSET(Foglio1!$A$1,,,50,50)
regards
r
2011/4/24 karan karankan...@gmail.com
Hi
Thanks for the formula. It does help, but while trying it on a new
sheet its not working it gives an error #NAME?
On Apr 19, 9:07 pm, ashish koul koul.ash...@gmail.com wrote:
see if it helps
hi karan
unfortunately with very small numbers is small rounding errors. I
attach a sample
file
regards
r
2011/4/25 roberto mensa robb@gmail.com
rng =OFFSET(Foglio1!$A$1,,,50,50)
regards
r
2011/4/24 karan karankan...@gmail.com
Hi
Thanks for the formula. It does help, but while
with the arrayformula:
text in A2
definited name rng =OFFSET(Foglio1!$A$1,,,50,50)
in B2:
=MOD(LARGE(ISERROR(--MID(aSUBSTITUTE($A$2,.,0),ROW(rng),1))*ISERROR(--MID(SUBSTITUTE($A$2,.,0),ROW(rng)+COLUMN(rng),1))*IF(ISNUMBER(--MID(SUBSTITUTE($A$2,
ops ...
set_c as definited name:
=ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789.-_
the array romula not with name is:
=IF(ISERROR(SEARCH(@,A2)),,MID(
LEFT(A2,SEARCH(@,A2)),MAX(IF(ISERROR(SEARCH(MID(
look here
http://www.contextures.com/xlcomments03.html#Picture
regards
r
2011/1/26 Seba sebastjan.hri...@gmail.com
Hello,
I recorded a macro which adds content from certain range of cells to
another range of cells. Each cell serves as a content source for the
target cell comment.
My
try
Sub test()
Dim rng As Excel.Range
Dim v As Excel.Range
Set rng = [a1:a10]
For Each v In rng
write_comment v.Offset(, 1), v
Next
End Sub
Sub write_comment(rngc As Excel.Range, rngt As Excel.Range)
If TypeName(rngc.Comment) = Nothing Then
rngc.AddComment.Text
End If
rngc.Comment.Text
look here if that's what you mean:
http://www.erlandsendata.no/english/index.php?d=envbaolecontroloutlook
Sub ListAllItemsInInbox()
regards
r
2010/12/13 Santosh Vishwakarma eclerxsant...@gmail.com
Hi
Can any one let me know how to get the information about outlook folder
items (Inbox)
replace Range(A1:B334) with Selection
regards
r
2010/12/6 vebhav jain vebhav.j...@gmail.com
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
--
In B1
=INDIRECT(ACOLUMN(A1))
regards
r
2010/12/6 0 1 hhholme...@gmail.com
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.
2010/11/29 Chandra Shekar chandrashekarb@gmail.com
Hi,
Pls check this site it might help you.
http://www.mrexcel.com/forum/showthread.php?t=20611
Thanks
Chandra Shekar
get.cell returns (not set) information about the formatting, location, or
contents of a cell.
A function used in a
without a sample sheet with your data is not understood your request
regards
r
2010/11/29 Jagadeesh B S jagg...@gmail.com
Hello all,
Could someone please help me for my requirement
Thanks in advance
Jagadeesh B S
On Fri, Nov 26, 2010 at 12:44 PM, Jagadeesh B S jagg...@gmail.com
=OFFSET($B$1,SMALL(IF(MONTH($D$2:$D$29)=3,ROW($B$2:$B$29)),ROW(A1))-1,)
CTRL+SHIFT+ENTER
drag down
regards
r
2010/11/28 Anindya Roy anind...@gmail.com
Suppose I have a file which contains names of the candidates along with
their date of birth. Now if i want to sort out names which have
of course is:
=OFFSET($B$1,SMALL(IF(MONTH($D$2:$D$29)=11,ROW($B$2:$B$29)),ROW(A1))-1,)
regards
r
2010/11/29 roberto mensa robb@gmail.com
=OFFSET($B$1,SMALL(IF(MONTH($D$2:$D$29)=3,ROW($B$2:$B$29)),ROW(A1))-1,)
CTRL+SHIFT+ENTER
drag down
regards
r
2010/11/28 Anindya Roy anind
with UDF you can not:
look here:
http://spreadsheetpage.com/index.php/oddity/a_user_define_function_cant_change_the_worksheet_oh_yeah/
regards
r
2010/11/28 Rahul Kamal Gandhi myname.ra...@gmail.com
Guys, Can anyone Help me to Bold the text with the help of Formula
Eg.
A1 Cell Contains
2010/11/26 عمر omar27...@gmail.com
Yes yes
Very god
But I want it by code
Sub test()
Dim rng1 As Excel.Range
Dim rng2 As Excel.Range
On Error Resume Next
Set rng1 = Intersect(ActiveSheet.UsedRange, Range(A:A))
Set rng1 = Application.InputBox( _
Select series, _
hi Ashish,
There are problems to use VBA.Environ(appdata) ?
regards
r
2010/11/25 OpenExcel.com 26may.1...@gmail.com
Hi Friends,
Visit
http://www.excelitems.com/2010/11/speed-up-excel-start-up-faster-excel.html
on http://www.excelitems.com
2010/11/25 OpenExcel.com 26may.1...@gmail.com
A reference to 'Visual Basic for Applications' must be
made in order to access VBA Object model.
yes of course.
regards
r
--
--
Some important links for excel
is the problem?
Thanks Regards
Ashish Jain
(Microsoft Certified Application Specialist)
(Microsoft Certified Professional)
http://www.excelitems.com
http://www.openexcel.com
On Nov 25, 5:13 pm, roberto mensa robb
.
Thanks Regards
Ashish Jain
(Microsoft Certified Application Specialist)
(Microsoft Certified Professional)
http://www.excelitems.com
http://www.openexcel.com
On Nov 25, 6:23 pm, roberto mensa robb@gmail.com wrote:
perhaps I was misunderstood
the best download excel gant that i know is here:
http://www.riolab.org/index.php?option=com_contentview=articleid=76:diagramma-di-ganttcatid=47:excelItemid=68
for the page traslate in english:
I see you've changed the page I would have used even
s =VBA.Environ (appdata)
fso.BuildPath s = (s, Microsoft)
fso.BuildPath s = (s, Excel)
since excel until 2003 version also runs on mac
regards
r
2010/11/25 roberto mensa robb@gmail.com
hi Ashish
in my Italian version
sorry is:
s =VBA.Environ (appdata)
fso.BuildPath s = (s, Microsoft)
fso.BuildPath s = (s, Excel)
fso.BuildPath s = (s, excel*.xlb)
regards
r
2010/11/25 roberto mensa robb@gmail.com
I see you've changed the page I would have used even
s =VBA.Environ (appdata)
fso.BuildPath s = (s
try the file ... you can changed the number of columns for the split
regards
r
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join
hi Ashish,
there are some differences in methods between 2003 and 2007 versions.
The method Create of PivotCaches is not present into 2003 version and
replaces the method Add.
regards
r
2010/11/24 OpenExcel.com ashishj...@openexcel.com
HI Raj,
You can use the below mention code:
Focus on
try this function changed
Function ProperCase_r( _
ByVal s As String) As String
'__
'¯¯
'https://sites.google.com/site/e90e50/vbscript/regexp
'__
2010/11/9 neil johnson neil.jh...@googlemail.com
Hi,
I make textbox in user form. The label of this texbox email . When i enter
the email address with out using or forget @ and Dot(.). It should give me
msg . please use valid email Id .
Wht will be code of this . Please find the
Thanks for the link. But is there a way to get an english translation of
the site? The link takes me directly to the page and to a language I do not
understand :)
I use Mozilla Firefox (If this is any help) :)
Thanks
Ashish
hello Ashish,
you can use traslate google:
the sub test is just one example of how to use the function into a routine.
Sub test()
Dim s As String
s = AGREEMENT. THE ADOPTION THE ADULT OR MARRIED MINOR
s = ProperCase_r(s)
Debug.Print s
End Sub
r
--
--
Some
I don't understand
which linguage do you use?
In visual basic as I have proposed is a function you can pass any text and
use its result
regards
r
2010/10/28 amrahs k amrahs...@gmail.com
Hi,
This works great. Thanks for your efforts and help. Though I have a small
need as well.
The
try:
Private Sub CommandButton1_Click()
Dim item, rng As Excel.Range
For item = 0 To ListBox1.ListCount - 1
If Me.ListBox1.Selected(item) = True Then
Set rng = Sheet2.Range(A Rows.Count). _
End(xlUp).Offset(1, 0)
rng.Value = Me.ListBox1.List(item, 0)
if you want to work with csv files closed, please open the csv file with
Notepad, copy and paste the contents here.
regards
r
2010/10/21 CAN cdelano...@gmail.com
I have a .CSV file see sample below which I need macro to convert
to .txt file in an specific format.
Orginal file will be like
2010/10/22 Ashish Jain ashishj...@openexcel.com
3. In cell A10, use the formula below(any version of excel):
=If(A9=0.5,2,If(A9=0.8,3,If(A9=0.8,4,3)))
an alternative to the formula of Ashish Jain for point 3.
=MAX(FREQUENCY(A9,{0.5;0.8})*{2;3;4})
regards
r
--
try this soluction:
'in the class moduleuserform2
'showmodale=false
Private Sub CommandButton1_Click()
Dim d
d = Now
UserForm1.Show vbModeless
'your code
'for example
Do
Loop Until Now (d + TimeValue(00:00:10))
Unload UserForm1
End Sub
'in the class moduleuserform1
Private Sub
2010/10/20 RemyMaza remym...@gmail.com
That works fantastic. It has some problems with how my form works
though. Let's say for all 7 combo-boxes, the user can only select
values in order. So if I need 4 devices added, I can't pick from the
first two and then jump to combo box 5 and 6 to
attack the sample file
regards
r
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @
you need to use:
Property Worksheets As Sheets
of Excel.Workbook
Public Sub CopyShNamesFromWkbToWkb2()
Dim i As Long
Dim wkb As Excel.Workbook
Dim wkb2 As Excel.Workbook
Set wkb = Workbooks(Nouveau_Feuille_Excel_1.xls)
Set wkb2 = Workbooks(Classeur1.xls)
'Dim ws As Object
'Set ws =
For i = 1 To wkb.Worksheets.Count
Fix this line
regards
r
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN
2010/9/22 Ayush jainayus...@gmail.com
Dear Group,
A small quiz for you...let see who answers it first and correct
A raise to the power B equals C
example 2 raise to the power 5 equals 32
Now you have to tell me how would you calculate the third variable if
you have only two variables
look this link:
https://sites.google.com/site/e90e50/vba/rimuoverepasswordexcel
regards
r
2010/9/13 vikas gupta vikas.63...@gmail.com
Dear All
I have a protected excel file can any one unprotect it
regards
vikas
--
alternative to solving Aindril and if the code is not always located at the
end
try the UDF:
Function re_alpha_numeric(ByVal s As String, _
Optional bGlobal As Boolean) As String
Dim re As Object
Set re = CreateObject(vbscript.regexp)
re.Global = bGlobal
re.Pattern =
https://sites.google.com/site/e90e50/vba/rimuoverepasswordexcel
2010/8/18 viju mobile vijumob...@gmail.com
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
sample attached along...
Regards
r
2010/6/30 lucky singh lucky60...@gmail.com
4 variours formulas reuired...
sample attached along...
Regards,
Jay S
On Wed, Jun 30, 2010 at 3:21 AM, r robb@gmail.com wrote:
On 29 Giu, 12:05, lucky singh lucky60...@gmail.com wrote:
Hi All,
42 matches
Mail list logo
