|
More site info...
VBA Visual Basic for Applications (Microsoft) | Forum profile
|
|
Forum profile page for VBA Visual Basic for Applications (Microsoft) on http://www.tek-tips.com.
This report page is the aggregated overview from a single forum: VBA Visual Basic for Applications (Microsoft), located on the Message Board at http://www.tek-tips.com.
This forum profile page summarizes the general forum statistics such as: Users Activity, Forum Activity, and Top Authors, which are reported in either a table or graph below for a given reporting time period.
Additional forum profile information for "VBA Visual Basic for Applications (Microsoft)" on the Message Board at http://www.tek-tips.com is also shown in the following ways:
1) Latest Active Threads
2) Hot Threads for Last Week
Warning: These statistics are generated using 'best efforts' and can experience delays and reporting errors at times. Please note that such statistics do not constitute a forum's popularity and/or exact posting volumes at any given reporting period.
|
|
|
|
|
Posting activity on VBA Visual Basic for Applications (Microsoft):
|
|
Week
|
Month
|
3 Months
|
|
Threads:
|
67
|
182
|
611
|
|
Post:
|
180
|
511
|
1,819
|
|
|
VBA Visual Basic for Applications (Microsoft) Posting activity graph:
|
Top authors during last week:
user's latest post:
Excel = Enter Static Date when...
Published (2009-12-16 14:11:00)
Laurie, See, that was pretty painless AND it can be pretty fool-proof, if you were to add some sheet protection to protect that E3 cell from being tampered with, if necessary. Skip, Just traded in my old subtlety... for a NUANCE!
user's latest post:
Word 2003: Make copy of document
Published (2009-12-16 17:23:00)
Let's start with the following...before I have to eat some humble pie. from the standard installed Help.... Quote: Add method as it applies to the Documents object. Returns a Document object that represents a new, empty document added to the collection of open documents. expression.Add(Template, NewTemplate, DocumentType, Visible) expression Required. An expression that returns a Documents object. Template...
user's latest post:
Create error msg based on...
Published (2009-12-16 15:29:00)
I'd try this: If Val(oFld("Text36").Result) < Val(oFld("Text39").Result) Then Hope This Helps, PH. FAQ219-2884: How Do I Get Great Answers To my Tek-Tips Questions? FAQ181-2886: How can I maximize my chances of getting an answer?
user's latest post:
Quotes Appearing
Published (2009-12-14 22:10:00)
Thanks, PH!
user's latest post:
Word 2003: Make copy of document
Published (2009-12-15 02:30:00)
fumei: Well, I don't know about Office 2003, because I haven't gotten it to work yet (I haven't tested my latest alterations). However, in Office 2007, you're wrong. I CAN create make a new document, based of a doc (not DOT). It gets all content but attachedtemplate is the template the first document was created from... Unless I'm completely misunderstanding what you're saying, you're wrong. A simple...
user's latest post:
Speech Object error
Published (2009-12-16 07:45:00)
I just cut and pasted the code into a new workbook - to which I added three textboxes - in Excel 2003, and it worked for me. I don't know what Outlook has to do with it, or are you saying the workbook is a mail attachment? Just tried that, still works, this time in 2007. In one test I clicked the 'X' to shut Excel while it was running (a bit too trigger happy) and it did give me that error when it interrupted the code but...
user's latest post:
Macro to concatenate cells in excel
Published (2009-12-16 06:23:00)
Good Morning John This code is great (and also very instructive), but just one more quick question. can it carry to the next row automaticallt, combinding the cells until it reaches a blank row, because the Files that are sent to me often go down 1700 rows, Regards Jupops
user's latest post:
email from excel using vba using...
Published (2009-12-07 12:15:00)
Hi Skip, It works, that is brillant, I can not thank you enough for this, I thought I was going to lose my mind (hopefully not) can I use a simlar range code for creating the filename as I need to use the selected cells data from the third sheet Many Thanks again you have been a absolute star Diehippy
user's latest post:
Speech Object error
Published (2009-12-16 02:23:00)
Hi Skip, running in 2003: the same error, help for Speech object says that Dictation and Command & Control installation is optional (I have Text to Speech toolbar icons disabled), additionally, don't know why, vba accepts only double 'Object': Application.Speech.Speak .OLEFormat.Object. Object .Text combo
user's latest post:
Running VBA Code
Published (2009-12-10 13:13:00)
or did you mean that when a USER edits a formula, it doesn't trigger the Worksheet_Change Event ? Sorry, I didn't understand. Chew 10% of your life is what happens to you. 90% of your life is how you deal with it.
|
|
|
|
Latest active threads on VBA Visual Basic for Applications (Microsoft)::
Started 4 weeks ago (2009-11-20 13:50:00)
by SkipVought
hi, Don't know if any of this may help. I think the culprit is your printer or printer driver... CODE ' 'turn OFF ScreenUpdating ' Application.ScreenUpdating = False ' 'reference the Worksheet object for ALL related object calls ' With Worksheets("Form") For i = StartRow To EndRow .Range("RowIndex") = i 'For Footer...
Started 2 days, 8 hours ago (2009-12-16 08:50:00)
by SkipVought
Hi, You might get better results in one of the many MS Access forums. But here's a shot -- Change the format of your date string to the UNAMBIGUOUS yyyy/mm/dd format. Your dd/mm/yyyy just may be causing the import manager some heartburn, cuz, Bill Gates & Co probably expect mm/dd/yyyy, just guessing. Skip, Just traded in my old subtlety... for a NUANCE!
Started 1 day, 6 hours ago (2009-12-17 11:15:00)
by SkipVought
Hi, ThereUare ( Programmer ) How about posting the code that you have generated so far. Skip, Just traded in my old subtlety... for a NUANCE!
Started 2 days, 4 hours ago (2009-12-16 13:06:00)
by SkipVought
Hi, Right-Click the Sheet Tab and select View Code This put you in the Worksheet Code Window for the sheet that you want to code this event. The EVENT is the Worksheet_Calculate event, since, I assume that D3 contains a FOLMULA and will not actually change. CODE Private Sub Worksheet_Calculate() If [D3].Value = 1 And [E3].Value = "" Then [E3].Value = Date End Sub Skip, ...
Started 1 day, 4 hours ago (2009-12-17 13:13:00)
by Gavona
Here is the macro I use to do that CODE Sub PvtFieldsSumComma() OldCalc = Application.Calculation Application.Calculation = xlCalculationManual Application.ScreenUpdating = False Dim PvtField As PivotField For Each PvtField In Selection. PivotTable.DataFields With PvtField .Function = xlSum .NumberFormat = "#,##0" .Caption = Replace(.Caption, "Sum of", "") ...
Started 1 week ago (2009-12-11 10:23:00)
by BrianWen
Of course, I could save the document again, but that requires the document to be open in some way and that might not always to the case.
Started 2 days, 2 hours ago (2009-12-16 15:29:00)
by PHV
I'd try this: If Val(oFld("Text36").Result) < Val(oFld("Text39").Result) Then Hope This Helps, PH. FAQ219-2884: How Do I Get Great Answers To my Tek-Tips Questions? FAQ181-2886: How can I maximize my chances of getting an answer?
Started 2 days, 5 hours ago (2009-12-16 12:04:00)
by PHV
I'd replace this: Activecell.Value with this: xlApp.ActiveCell.Value Hope This Helps, PH. FAQ219-2884: How Do I Get Great Answers To my Tek-Tips Questions? FAQ181-2886: How can I maximize my chances of getting an answer?
Started 3 days, 6 hours ago (2009-12-15 10:54:00)
by anotherhiggins
First, I assume that C1 is actually "Y " (with a space after the "Y")? Otherwise there's no way for Excel to know to put a space there. And, FYI, cells are referred to by column first, then row - so it's C1, not 1C. I happen to have something around that I wrote a while back that should work for you. To use it, just select the first column of cells that you want to combine. In your example, ...
|
|
Hot threads for last week on VBA Visual Basic for Applications (Microsoft)::
Started 1 week ago (2009-12-11 10:23:00)
by BrianWen
Of course, I could save the document again, but that requires the document to be open in some way and that might not always to the case.
Started 1 week, 2 days ago (2009-12-09 16:10:00)
by SkipVought
Hi, Put a BREAK on the first execuatble statement of the code. Make a change on the sheet. Observe if the break occurs. Skip, Just traded in my old subtlety... for a NUANCE!
Started 2 days, 5 hours ago (2009-12-16 12:04:00)
by PHV
I'd replace this: Activecell.Value with this: xlApp.ActiveCell.Value Hope This Helps, PH. FAQ219-2884: How Do I Get Great Answers To my Tek-Tips Questions? FAQ181-2886: How can I maximize my chances of getting an answer?
Started 2 days, 4 hours ago (2009-12-16 13:06:00)
by SkipVought
Hi, Right-Click the Sheet Tab and select View Code This put you in the Worksheet Code Window for the sheet that you want to code this event. The EVENT is the Worksheet_Calculate event, since, I assume that D3 contains a FOLMULA and will not actually change. CODE Private Sub Worksheet_Calculate() If [D3].Value = 1 And [E3].Value = "" Then [E3].Value = Date End Sub Skip, ...
Started 1 day, 6 hours ago (2009-12-17 11:15:00)
by SkipVought
Hi, ThereUare ( Programmer ) How about posting the code that you have generated so far. Skip, Just traded in my old subtlety... for a NUANCE!
Started 4 days, 3 hours ago (2009-12-14 14:22:00)
by fumei
Quote: VB loads "12345" (with quotes) into variable Tag. It does? Where? How do you know this? CODE Sub Yadda() Dim Tag Dim VariableRow ' why is this not an explicit data type? VariableRow = 1 'Value entered into cell (1, 1) = 12345 Tag = Worksheets("Sheet1").Cells(VariableRow, 1).Value ' not here MsgBox Tag ' not here either Worksheets("Sheet1").Cells(1, 3).Value = Tag End Sub...
Started 1 week, 1 day ago (2009-12-09 20:43:00)
by SkipVought
Hi, Check out the Names collection. Skip, Just traded in my old subtlety... for a NUANCE!
Started 1 week ago (2009-12-11 06:10:00)
by PHV
I'd try this: FormName = Selection.FormFields( " EmployeeName " ).Result Hope This Helps, PH. FAQ219-2884: How Do I Get Great Answers To my Tek-Tips Questions? FAQ181-2886: How can I maximize my chances of getting an answer?
Started 1 week, 1 day ago (2009-12-10 12:22:00)
by SkipVought
Hi, I'm a big fan of John Walkenbach, although I do not have his 2007 book. Quote: Also, would it be appropriate to introduce them to this forum throughout the course, or do they need to be in their professional career first? Yes, as long as you emphasize that Tek-Tips is not a site for homework assignments. I would also introduce them to sister site, www. Eng-Tips.com Skip, Just ...
Started 3 days, 7 hours ago (2009-12-15 10:07:00)
by PHV
Perhaps something like this ? DoCmd.OpenForm "frm- presenter" , acNormal, , "roomId=" & Me!roomId DoEvents Forms!frm-presenter!roomId.DefaultValue = Me!roomId Hope This Helps, PH. FAQ219-2884: How Do I Get Great Answers To my Tek-Tips Questions? FAQ181-2886: How can I maximize my chances of getting an answer?
|
|
Size: 4,320 bytes
