Answer Questions

• dbcuser Coordinate of the mouse pointer in chart object client coordinates

  Hello, I am writing the code in order to be able to zoom on chart. It is supposed to change axis scales in order to display only selected area. So the aim is to get new X and Y axes min and max coordinates. But the coordinates don't make sense. I think it is because the chart object client coordinates units are not points. So please do you have any ideas this is the code: Private Sub Chart_MouseDown(ByVal Button As Long, _ ByVal Shift As Long, ByVal X As Long, ByVal Y As Long) If Shift = 2 And Button = 1 Then ActiveChart.Deselect firstX = X firstY = Y End If End Sub Private Sub Chart_MouseUp(ByVal Button As Long, _ ByVal Shift As Long, ByVal X As Long, ByVal Y As Long) If Shift = 2 An ...Show All

• Test1234525 Trying to process data in an Excel Worksheet. A simple routine but I am stuck :(

  Hi, I'm affraid I bit off more than I can chew and It's a while since I programmed. 1/ The routine is set in an open Excel worksheet which has 5 fields/columns per row 2/ The routine reads 1 row at a time, splits 1 field, does some ifs and appends 6 new fields per row 3/ I'm stuck with the Loop 4/ I'm stuck with the IFs especially bracketing 5/ I'm stuck with the output writes I'd really appreciate if you could just wiiiizzz through it and ellimate the mistakes. For you 5 mins for me 5 days. Here it is .... Sub TeamPerformance01() ' TeamPerformance01 ' Name Fields in open worksheet ActiveWorkbook.Names.Add Name:="Date", RefersToR1C1:="=Sheet1!C1" Columns("A:A").Select ...Show All

• *A VBA Editor fails to start from Access 2003

  I get the following dialog when I try to start the VBA editor from within Access 2003. *********** Microsoft Visual C++ Runtime Library Runtime Error! Program: C:\Program Files\Microsoft Office\OFFICE11\MSACCWSS.EXE This application has requested the Runtime to terminate if in an unusual way. Please contact the applications support team for more information. ***************** This modal dialog pops up in front of the editor and when I press the OK button, which is the only one available, it shuts down that instance of Access along with the editor window. This dialog pops up whenever I try to start the VBA editor from within Access 2003. It does not matter if it is a new file I just created or an existing mdb file th ...Show All

• allpdoff SendKeys open application

  Hi! I try to open a program from a macro in Excel and login (the Bloomberg professional, (not the website)) using SendKeys. With some help from other programmers I got the following code. It does not work at all though and I am lost. Can someone please help me with this My problems are: 1) I get error on the WaitFor …line. ”Sub or Function has not been defined” 2) If I delete the WairFor line I get error on the AppActivate("1-BLOOMBERG") line. “Illegal procedure call or argument” Sub bbg_login() AppActivate("1-BLOOMBERG") Application.SendKeys "{BREAK}",false WaitFor timevalue("00:00:01") Application.SendKeys "user_Name", false Application.SendKeys "{ ...Show All

• MIC DA EDY EULA for my product

  I'm nearing completion of my first product and think I need to include a EULA as part of the install. Is there a standard template somewhere of a boilerplate EULA Something that says this software isn't meant to run nuclear reactors, if the user gets tumors it isn't our fault, etc. I looked at creative Commons and they offer some stuff, but I'm more interested in the standard type of EULA. Any help would be greatly apperciated. Jake If you are shipping a closed-source product, I would think that Creative Commons doesn't have what you want. They intentionally don't address typical software licensing. Have you looked at EULAs of software that you have seen and used Is there one that was particularly satisfactory ...Show All

• ZopoStyle Need help writting a script similar to...

  Sub CommandButton2_Click Me.Textbox7.Text = My.Computer.Filesystem.ReadAllText("C:\info.txt") End Sub I'm a newbie at VB all around, thought that the My namespace was part of the VBA build. I have no clue how to write this kind of script in VBA. Basicall, I have a file (C:\info.txt) that I need to copy all of the info in this file into a textbox (textbox7 to be exact) on the form whenever commandbutton2 is pressed. Any help would be greatly appreciated. Thanks Jdwilliams Alright, The code I posted was just the VBA equivalent of the .NET code you posted, do you have a textbox7 on your form You click command is fine. If you try this you should see a msgbox containing your files text, this should show you it workin ...Show All

• Wiegje startup properties in Access

  I want to prevent others from changing the startup properties using VBA in another access file. I don't use User level security because I am not in a position to prevent either the database file being copied onto another machine or a workgroup file from being over written. In either of these cases I find the owner becomes unknown. There is a password on the VBA code. Hi Derek, Thanks for the reply. I do already have a password on the code. If I try and insert a form from another database it asks for a password, but I can change the startup properties from inside another database without the password being asked for. I have just checked it again in case I made a mistake. Dani ...Show All

• swingme Is there plug-ins to Live Communication Server 2005 to make it work like a call center?

  Hi. as of above, is there plug-ins to Live Communication Server 2005 to make it work like a call center I hope to customize LCS 2005 into a call centre in which we can have a dashboard to queue incoming IMs. For a commercial offering from Vayusphere for a call center/help desk queue management system based on Microsoft LCS (Live Communication Server) - check http://directory.partners.extranet.microsoft.com/rtc/solutionpreview.aspx sid=4104 http://www.vayusphere.com/newspressrelease_callcenter_lcs.htm ...Show All

• Shaantu How to send parameter from ms access to excel workbook ?

  How to send parameter from ms access to excel workbook I 'm developing MS Access application (GUI & Database used VBA programming ), but i sending report to MS Excel template. when user want to view that report .them will click button as open workbook from MS Accecc user interface. system will open workbook & pop-up from wait for user select input, submit and system will receive data from MS Access Database output to that worksheet. And now I need update that appication by select data item from listView from MS Access user interface and sendind some parameter for queries data same listview item to MS Excel template. On workbooks openning VBA will used parameter from MS Access and queries data same parameter from Database ...Show All

• ogtr obtain data of next 10 days

  Hi all, i need your help again. Now, my problem is, i have two columns of data. one of the columns is 1 to 100 and another column is data corresponding to column 1, which is shown below, and a userform which has a combo box with values from 1 to 100. data: 1 => d 2 => f 3 => t 4 =>s 5 => n 6 =>k 7 =>o 8 =>w 9 =>x 10 =>b 11 =>jo 12 =>yt 13 =>cv 14 =>ad . . . let say i have a combo box with values 1 to 100, when i choose one of the value in the combo box, i need a macro that can show me all the data of the following 10 days in another excel sheet. Can this be done Thanks a lot!! :) Hi Pippen Try the below: My data is in sheet1 a1:B100 . Cell G1 has my combo bo ...Show All

• VenkatB How to match slide and query numbers

  Hi all, I currently have a vba routine that steps through queries and slides on a powerpoint presentation. The powerpoint presentation is laid out as a template to ensure that the titles and graphs are formatted correctly. I have been using the slide number to match the query, eg. slide 1 runs query1output. This is complicated by the fact that a case statement is used to determine if the slide needs further manipulation. I am having a problem designing a routine that will match the proper slide with a query when a table is created that inserts additional slides. The template ppt has one slide as a placeholder and formatted titles for a table. The table is comprised of data that changes length depending on the month for the query. Bec ...Show All

• babarzhr Run time error '1004' ?

  Hi, How to fix this problem when i run the below code in Access 2003 that prompt the error message as Run time error '1004' Application-defined or object defined error Thanks! Perry   Dim cnnConn As ADODB.Connection Dim rstRecordset As ADODB.Recordset Dim cmdCommand As ADODB.Command Dim strSQL As String Dim xls As New Excel.Application Dim MasterRng As Excel.Range Dim objPivotCache As Excel.PivotCache ' Open the connection. Set cnnConn = New ADODB.Connection Set cnnConn = Application.CurrentProject.Connection strSQL = "SELECT  * FROM [TAB];" ' Set the command text. Set cmdCommand = New ADODB.Command Set cmdCommand.ActiveConnection = cnnConn With cmdCommand     .Comman ...Show All

• mcrisf Export excel sheet as text file with macro code

  Hi, How do I export a specific excel sheet (say sheet1) as a text file I would like to do this with macro code. Grateful for ideas on this. \Jonas Thanks a lot, it works like a sharm! This code will do it: Sheet1.SaveAs "C:\output path\output file.txt", <format> The <format> parameter is of type XlFileFormat; for a CSV text file, use xlCSV or xlCSVMSDOS. The VBA documentation enumerates all the possible format options. ...Show All

• Drudkh Error handling problem

  Hi - i have an end of month routine that will run - however it brings up error 3021: no current record.  this occurs if the user presses the command button where they have not entered any activity that is greater than the 'datelastsubmitted' date because the form loads with the following code: Private Sub Form_Load() Me!officer.SetFocus officer.Value = loginname Me.submit.Enabled = False Dim rsdbase As Database Dim rstemp As Recordset Set rsdbase = CurrentDb Set rstemp = rsdbase.OpenRecordset("SELECT SUM(activityhours)AS [availablehours] FROM [qryavailablehours]WHERE [loginname] ='" & CStr(Me.officer.Value) & "'") With rstemp     .MoveFirst     Me.availablehours = Format(Nz(!availablehours, ...Show All

• Alepodrakoulas Help !!!

  Hi, I want to show shape custom properties when I choose an Item of Combo Box in Visio 2003. I have this code so far. Private Sub ComboBox1_Change() Dim visShape As Visio.Shape Set visShape = ActivePage.Shapes.Item(4) Select Case ComboBox1 Case "hardware devices" visShape.Application.DoCmd (1312) Case ... End Select End Sub The problem with him is that this display the Custom Properties of the Selected Shape. I want to display this shape wich I want in this case : Set visShape = ActivePage.Shapes.Item(4) I think this is very close to the right code,and I don't know what's wrong with this code. I'll be greatful to you if you have any ideas about this !!! Tnank you in advanced! ...Show All