How can I show the formula result in my cells?

Visual Basic for Applications (VBA)

‹ Microsoft ISV
- Archive
  - SharePoint
  - Windows Vista
  - SQL Server
  - Smart Device
  - Office
  - VFP
  - VS Express
  - Visual C#
  - ISV
  - Game
  - Visual Studio
  - VS 2008
  - Architecture
  - Windows Forms
  - Dotnet
  - VC++
  - VB
  - Windows Live
  - IE

- Previous
  - 1
    - Automatically send attachment in email with a submit command button in word Hi Did you remeber to send the mail item in your code Tag: How can I show the formula result in my cells?
  - 2
    - Excel VBA Hi everbody! I am using Excel and I wrote a code using VBA. I have subroutine which open and read text file. I call this subroutine in the master program. The object of the program is to open read a text file(numeric) and make average of the data , make a table and fill the table with the data. However, I want to modify the program so that it can open 5 text file at the same time and process the data. Below I have a code that open and read one file. Could you please give me an advice how to open and read multiply files at the same time Thanks in advance Filename = Application.GetOpenFilename() Close FileNumber = 1 Open Filename For Input As #FileNumber ' Get data, here I call the subrutine that read the data Close If DataCount = 0 Then MsgBox "No data" Exit Sub End If Tag: How can I show the formula result in my cells?
  - 3
    - .mdmp files not being created OK, while setting ForceQueue to 1 does happily generate the minidump, now the user sees no UI of this happening. Before, a dialog said <Program> has stopped working ... [Debug] [Close Program] Is there a way to both generate the minidump AND have the dialog Thanks, David Tag: How can I show the formula result in my cells?
  - 4
    - How do I accomplish this in VBA using Office 97 and later? I am trying to come up with a system that would improve efficiency in creating Request for Quote and Purchase Orders. As an example, here is what I am trying to do with the Request for Quote. 1.) A new document from a template called "Request for Quote" is created. 2.) The system asks for an Excel file to import that has bid item information in specific columns and from a set row down to the end. 3.) The system uses an Outlook address book to pull up a list of vendors. You can then select a checkbox control next to each vendor to include the vendor. Vendors are displayed one by one from top to bottom. 4.) The same thing done in step 3 is performed for the bid items using the Excel file imported earlier. 5.) The information is appropriately placed in the template. I can apply the Request for Quote concepts to Purchase Orders. Any idea on the most efficient way to accomplish this type of system Tag: How can I show the formula result in my cells?
  - 5
    - ASP .NET 1.1 fails at install, but not .NET Framework 1.1 Hi there, My Scorecard Manager 2005 installation finds that I do not have ASP .NET 1.1 installed, but it finds .NET Framework 1.1 installed. I could not find a download for ASP .NET 1.1 outside of the .NET Framework 1.1. Can anyone explain in a few words what is the difference between the framework and the asp .net To note that when I try to install the .NET Framework 1.1, which I cannot see installed in my programs, the installation is failing due to product already installed. I am a little confused. The OS is Server 2003 SP1. Thank much. Tag: How can I show the formula result in my cells?
  - 6
    - How to allow cookies for Windows Live ID Hi, This Windows Live Help Central page covers Windows Live ID and Hotmail issues: http://help.msn.com/(cHJvamVjdD1wYXNzcG9ydDQmbWFya2V0PWVuLVVT)/help.aspx querytype=topic&query=Passportv4_TROU_CannotSignIn.htm&fs=1 I hope this helps you resolve the issue. -brenda (ISV Buddy Team) Tag: How can I show the formula result in my cells?
  - 7
    - Projects, objects & modules Place this code in Thisdocument. Save/close the file then re open it. The Open event will be trigger and the message displayed. Private Sub Document_Open() ' will display a message box when document is opened. MsgBox "Hello World" End Sub ThisDocument refers to the document that contains the code currently being executed. The application also has an ActiveDocument reference which as the name suggests refers to the active document. The updating of this reference is handled automatically by the application. Copy the following code into a standard module within your document. Within the VBE (Visual Basic Editor) environment press CTRL+G to display the immediate window. From here you can run the macro by simply typing DocInfo and pressing enter. The message boxes should display the same name for This and Active document. Now open another document file and re run the macro. This time the activedocument name should be that of the newly opened file whereas the Thisdocument will be the same. Sub DocInfo() MsgBox "Thisdocument is " & ThisDocument.Name MsgBox "Active Document is " & ActiveDocument.Name End Sub Tag: How can I show the formula result in my cells?
  - 8
    - A macro to count the number of macros in a woorkbook Never mind, I just had to check the box in the Macro Security settings to trust access from VB programs. Thanks again Tag: How can I show the formula result in my cells?
  - 9
    - ComboBox listing on Startup You have missed the Sub out of your code example Code Snippet Private SUB UserForm_Initialize() ComboBox1.AddItem ("Open App1") ComboBox1.AddItem ("Open App2") ComboBox1.AddItem ("Open App3") ComboBox1.AddItem ("Open App4") End Sub Tag: How can I show the formula result in my cells?
  - 10
    - PASSING MS OUTLOOK DATA TO EXCEL Is it possible to pass Outlook information such as dates and durations of meeting to an Excel spreadsheet I would need to do this via a macro. I need this to create a time card that tracks how much time is being spent in meetings. Thanks! Tag: How can I show the formula result in my cells?
  - 11
    - MDI on old Office but not on new Office 2007? I had regularly emailed myself in the past from my older version office {2003} {work laptop with no printer attached} to my newer office XP on my personal system to print but now that I have upgraded to Office 2007 the MDI is not recognized. How can I install the MDI drivers so I can print again Tag: How can I show the formula result in my cells?
  - 12
    - referenced memory error hello people. can someone help me. My computer displays an error saying instruction at "0x269e7875" refernced memory at "0x269e7875". The memory could not be "read". Click ok to terminate the program. And I cannot switch from one user to another. I can log-off from windows and switch user. It needs to be restarted every time I want to switch from one user to another. Tag: How can I show the formula result in my cells?
  - 13
    - Visual Basic Code Corrupted? Hi, I have been having several problems on a complicated excel spreadheet that I have been developing, that have led me to believe that the file i am working on has been corrupted. The problems started when I switched PC's that I used for developing (i.e. was given a slower PC to work on). Since then, I have been having all sorts of problems with my macros. Now, even when I open the file on other, faster machines, the results are still unstable, with features that were previously working normally still not working. Is it possible that the PC that I switched to has somehow corrupted the compiled VBA code stored in the excel file For example, a simple procedure that hides some columns on a sheet when a value is changed is not working. However, when I duplicate the exact same code, and trigger it when a different value on the sheet changes, the new procedure works. (The old procedure has a problem with activating the sheet on which to hide the columns). As the code is exactly the ame, could it be that the already complied VBA code in the excel file is corrupt Many thanks for any help! Tag: How can I show the formula result in my cells?
  - 14
    - Removing "Trial Version" from Web Components on SharePoint web sites Hello, I would like to remove the "Trial Version" as stated above. I used CSS but then other part disappear as well so this is not an option. Then I tried JavaScript but wasn't working either. Question: is it somehow possible to do it with JavaScript (I have only limited scripting capabilities). Or can I directly access the template that creates the different sharepoint web sites for my purposes I would appreciate advice on this matter and thank you for your attention. Regards Christian Tag: How can I show the formula result in my cells?
  - 15
    - Multithreading with VBA6 and Access Hello, I'm not so familiar with VBA/Access. I have to maintain an existing application. Now I need that a user can use the application and in the background a function must at certain times (these times are in a table param) lookup and export a XML file from a query. IS IT POSSIBLE TO CREATE MULTITHREADING WITH VBA AND ACCESS AND IF YES HOW I read at some forums it should be possible but I have never read how Thanks in advance. Nico Tag: How can I show the formula result in my cells?
  - 16
    - Validation with List drop down? Hi, Not sure how you can force enter but this make the cell for that row active. In what way did your other workbook force entry Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Range("C:C"), Target) Is Nothing Then If Target.Value = "No" Then Range("D" & Target.Row).Select End If End If End Sub Tag: How can I show the formula result in my cells?
- Next
  - 1
    - Windows media files have changes to Nero Hi Rich, Here's another suggestion from our internal WMP alias: Well, WMP's Tools:Options:File Types is your first stop. Then Explorer's Tools:Folder Options:File Types. Then the Set Program Access and Defaults Control Panel (SPAD). But none of that is permanent, because permanent is generally evil and completely impossible for My Mom or Dad user to understand. If you really want to Always Open With, right-click on the media type in question within Explorer, choose Open With, choose Choose Program, then select the application you love and click the "Always use..." checkbox. Hope this works for you! -brenda (ISV Buddy Team) Tag: How can I show the formula result in my cells?
  - 2
    - Icons In ListBox Hi all, Thank you very much Derek Smyth. Tag: How can I show the formula result in my cells?
  - 3
    - Finding Quartiles From 2 Dimensional Array Using Excel's Quartile Function Andy, Thanks for the answer, but I am trying to select a range in Visual Basic Express 2005, for example and entire column in a virtual 2 dimensional array and then use the quartile function as follows: Quartile1 = Application.WorksheetFunction.Quartile(Array,1), to get the first quartile of the numbers contained in Array. I have tried this several ways as shown below and nothing works. The exact same function syntax will work for the "Average" function, however. This seems to be a VBE question, but Bruno move it here in hopes of a better response. Any more ideas Thanks in advance. Glenn For x = 1 To Iterations QuartileHolding(x, 1) = PortVal(x, 1) MsgBox("Quartile Holding " & x & " = " & QuartileHolding(x, 1)) Next Quartiles(1, 1) = (objExcel.Application.WorksheetFunction.Quartile(QuartileHolding, 1)) MsgBox("Quartiles 1 1 = " & Quartiles(1, 1)) For x = 1 To Iterations For i = 1 To Years MsgBox("MyArray " & x & " " & i & " = " & MyArray(x, i)) Quartiles(i, 1) = (objExcel.Application.WorksheetFunction.Quartile(PortVal(x, Iterations), 1)) Quartiles(i, 2) = (objExcel.Application.WorksheetFunction.Quartile(PortVal(x, Iterations), 2)) Quartiles(i, 3) = (objExcel.Application.WorksheetFunction.Quartile(PortVal(x, Iterations), 3)) Quartiles(i, 4) = (objExcel.Application.WorksheetFunction.Quartile(PortVal(x, Iterations), 4)) Next Next For x = 1 To 4 For i = 1 To Years MsgBox("Quartiles " & x & " " & i & " = " & Quartiles(x, i)) Next Next Tag: How can I show the formula result in my cells?
  - 4
    - Assigning text box input to cells I have two problems. here is the first; In Excel I have a userform that prompts the user to enter values in text boxes. I then assign the values entered in the text boxes to various cells as follows; Range("B8").Value = TextBox1.Value Is there a more correct way of doing this I am not sure if I should be using Range. OK, here is my next problem; The userform is presented by a Do While loop so the user can enter a second, third, fourth etc etc set of values. Each time they enter set of values I want to increment the row number where they are copied to. Thus I need a counter variable to represent the row number. How do I incorporate this into the statement that copies the value from the text box to the cell I am guessing it is something like; Range("rowCounter8").Value = TextBox1.Value rowCounter = rowCounter + 1 Any ideas Tag: How can I show the formula result in my cells?
  - 5
    - VBA excel outlook / A program is trying to send mail using Item.Send HI rhXX I am facing similar problem as u did. Could you please give me some details how did u manage to bypass outlook security message. thankz Tag: How can I show the formula result in my cells?
  - 6
    - *** How can I add module code to a specific module? *** NEED HELP !!!! Shasur, Thanks for the reply and the snippet. However, I now run into another problem - A BIGGER PROBLEM. All the production workbooks are password protected including the VBAProject. As a result, I am unable to alter the module or in my case add a new module programmtically. I have been doing lots of research this morning to see how this could be done and it does not appear one can unprotect the VBAProject via code althought I have some examples where one uses SendKeys() as the trick to accomplish this. I am experiementing this SendKeys in VB.NET and I just can't get it to work. Does anyone know how to do this Any other way or better approaching in doing this Any help you can offer is greatly appreciated. -Sydney Tag: How can I show the formula result in my cells?
  - 7
    - ListBox.AddItem drops value for last column if semicolon is in data Hi, I am using a ListBox in MS Access 2003 with multiple columns that may have commas or semicolons are part of the data. I understand that when using the AddItem method that I need to use double quotes to surround the data before delimiting the values with semicolons. The problem is that when a semicolon exists inside a value, the ListBox drops the last column. Example: Code Block Dim strRowItem As String strRowItem = """" & "one;one" & """;""" & "two" & """;""" & "three" & """" List1.RowSourceType = "Value List" List1.ColumnCount = 3 List1.RowSource = "" List1.AddItem strRowItem In this case, the example row in the ListBox List1 will have "one;one" in the first column, "two" in the second column, and the third column is blank (and any subsequent AddItems will be off by one because it will start with the first empty column). I played with it a little bit and discovered that this behavior does not happen with commas, just semicolons. Is there a way to work around this, or am I doing it wrong Thanks, KW Tag: How can I show the formula result in my cells?
  - 8
    - Problem to activate server in live communications server 2005 Hi Nard8102, follow the rules man Activating the Standard Edition Server ordinarily requires Domain Admins or equivalent credentials. You can allow an administrator who is not a member of the Domain Admins group to activate a server by: 1. Setting access control entries (ACEs) on particular objects before the installation of the server. 2. Granting the rights to install the server to this administrator��s account. The following permissions are required to run activation: �� Permissions on the local computer, which are granted with local administrator credentials. �� Permissions on the Live Communications Server Active Directory objects. This requires RTCDomainServerAdmins credentials. �� Permissions on the domain service account. �� Permissions on the Computer object. �� Permissions to modify membership in the RTCHSDomainServices group. �� Permissions to modify membership in the Domain Users group. Therefore, to grant a user these permissions, perform the following tasks: �� Add the user account to the RTCDomainServerAdmins groups. �� Grant the user account permissions to edit a service account. �� Grant the user account rights on the Computer object. Grant the user rights to modify membership in the RTCHSDomainsServices group Regards, Jugal jugal_55@yahoo.com Tag: How can I show the formula result in my cells?
  - 9
    - Excel status loader/counter? Hey, Not quite sure how to word this but what i'm looking for is like some sort of preloader or egg timer style graphic or percentage counter to display when my function is running to indicate to users the current progress. The function i'm running takes up to 3 mins to calculate so wanted to be able to show users that the program hasn't froze etc. [EDIT] Sorry just to update, i now know how to show the egg timer etc using application.cursor=XLwait but i would be interested to know if a percentage bar can be displayed Thanks Any ideas Tag: How can I show the formula result in my cells?
  - 10
    - Enable/disable specific button in command bar Hi! Shapes have no events. So you cannot use _GotFocus or LostFocus events and attached procedures. Tag: How can I show the formula result in my cells?
  - 11
    - Add a customized Tab in Communicator 2005 Hi Gabriel, Below is an extract from the Planning and Deployment Guide of Microsoft Office Communicator 2005. I think it answers your question. Note A dotted, fully qualified domain name in the URL, such as http://www.contoso.com/tab.xml , will be treated as an Internet site and be rejected. Instead, try using a local Intranet address, such as http://contoso/tab.xml . Thanks... Rishabh Tag: How can I show the formula result in my cells?
  - 12
    - Are these valid bucket ids ? Thank you both Claus and Saar for your reply. I observed another problem : Suppose I am using WER_SUBMIT_QUEUE flag in WerReportSubmit() In this case, I see a complete report in the queue with dump attached. No complain with this flag. Product Appln 7.30r0 Problem Stopped working Date 6/27/2007 2:01 PM Status Not Reported Problem signature Problem Event Name: APPCRASH Application Name: Apppln.exe Application Version: 7.30.0.0 Application Timestamp: 46821da5 Fault Module Name: test.dll Fault Module Version: 7.30.1.0 Fault Module Timestamp: 467f877a Exception Code: c0000005 Exception Offset: 002DB1A7 OS Version: 6.0.6000.2.0.0.256.4 Locale ID: 1033 Files that help describe the problem Version.txt minidump.mdmp Now, I changed WER_SUBMIT_QUEUE to WER_SUBMIT_NO_QUEUE and removed the network plug. Fyi, I am using reporting thru internet approach. Now report is queued up as network connection is not available. But, this report does not have the crash dump attached. Even if I am connected to net, then also report does not have crashdump attached. What is there in this flag that changes the behavior so drastically ! Now, I need to troubleshoot this problem. If you faced the similar situation, please suggest. Thanks, DHON Tag: How can I show the formula result in my cells?
  - 13
    - Enable/disable specific button in command bar Hi! Shapes have no events. So you cannot use _GotFocus or LostFocus events and attached procedures. Tag: How can I show the formula result in my cells?
  - 14
    - How to determine the cursor position to Excel range wow! would never have thought that was what you wanted from your first post To capture the range as an image use range("A1:C10").CopyPicture xlScreen,xlBitmap To do this manually select the range A1:C10 and the whilst holding the shift key use the menu Edit. You should see a new menu item Copy Picture. The dialog allows you to specify picture or bitmap, screen or printer version. Tag: How can I show the formula result in my cells?
  - 15
    - VBA Language Definition Hi, just a quick question Does there exist anywhere a formal definition of the VBA language It would be really useful for my dissertation as i am writing a program that interprets macros so could do with something that would tell me, for example all the different ways that variables can be defined, or all the different types of statement that can be used etc. Any advice is much appreciated Ryan Tag: How can I show the formula result in my cells?
  - 16
    - Configuration Failed: Windows SharePoint Services 3.0 (Beta) per an offline conversation, here's some additional info from the product team: This was a known issue for B1TR where some of our registry settings become corrupted, and that might still be lingering for Beta 2. Our best advice would be to ensure that they are installing on a clean machine (e.g., reinstall the OS and try the install again). There are a couple of registry hacks that customers have tried to fix the issue, but we would recommend against them. Unfortunately, due to the limited resources that we have to work with folks enrolled in TAP and Technical Beta programs, we��re unable to provide significant 1:1 support for customers in the public beta. -brenda (ISV Buddy Team) Tag: How can I show the formula result in my cells?

lyp_sj

I assigned a formula to Range(D210), but I cann't see the formula result in the spreadsheet, what I can do is only show the result by using msgbox. So how can I show my formula result in the spreadsheet Thanks so much!

Private Sub CommandButton1_Click()
Worksheets("MMS_RSP_Tonnes").Range("D210").FormulaR1C1 = "=MMS_RSP_GSV!R[0]C[0]*1000/GSVperTonne!R[0]C[0]"
Dim A As Variant
A = Worksheets("MMS_RSP_Tonnes").Range("D4").Value
MsgBox A
End Sub

Top

Re: How can I show the formula result in my cells?

Andy Pope

Hi,

Does the formula get placed in the cells on MMS_RSP_Tonnes

When I construct a simple test your code works fine.

Top

Re: How can I show the formula result in my cells?

lyp_sj

Hello, thanks so much! I tried again, it did work. I do not what happened last time. Anyway, thx so much!

Top