Search results for query: *

Thanks guys. This is what I came up with. Let me know if you see anywhere I can improve. -edward Sub HideChart() Dim SheetName As String Dim ws As Worksheet SheetName = Split(ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1).Formula, "(")(1) SheetName = Split(SheetName...

I have a workbook that contains six or seven sheets. I have a Pivot Chart on Sheet5 whose source data comes from a Pivot Table on Sheet2. I've created a button on the Pivot Chart sheet that when clicked will hide the sheet. Once clicked, I would like the Worksheet that the Pivot Chart source...

I know there is a more eloquent solution; however, this is what I came up with. It allows the user to overwrite an existing record, if found. I concatenated the three fields that need to be evaluated, and then used the countif and match function. Regards, -ep Private Sub cmdSubmit_Click()...

I have a UserForm which enters data into a structured table. I need to prevent duplicate records from being entered based on three criteria: date, shift and time. Ideally, the user would be prompted with a Msgbox alerting them that there is a duplicate record. They would have the option to...

Thanks Skip.

Figured it out! Private Sub setMonth() Dim ws As Worksheet Dim cMonth As String Dim myMonth As Range Dim curDate As Range Set ws = Worksheets("ranges") cMonth = ws.Range("currentMonth") Set myMonth = Range(cMonth) For Each curDate In myMonth With Me.cboDate...

My apologies the variable is curDate, not cDate. Thanks again.

I'm trying to populate a ComboBox with a named range. For example, I have a named range called currentMonth. This range contains the name of a month. I have named ranges for all of the months. So if currentMonth contains October, then the ComboBox would be populated with the named range...

Skip, Everything is working great now with the excepting of the truncating problem. I tried changing the MaxScanRows to 1. I also tried editing the TypeGuessRows value in the registry; however, neither one of those changes worked. Do you have any suggestions? The query does not truncate the...

The macro is working great. There are still a few issues I'm working out with the way the picture re-sizes, but nothing major so far. I am having a problem with the data being truncated. The cell receiving each recordset is truncating any data after 255 characters. Any ideas? I'm using...

Thanks for the macro Skip. I'm out of the office for two days. Will report back with the results Friday. Thanks again for the help. -edward

I kept receiving an "ODBC Excel Driver Login Failed" error. "Unrecognized database format." I deleted the table and created a new one, and I was able to record a macro using your instructions. Sub Macro4() With Selection.ListObject.QueryTable .Connection = Array(Array( _...

I think this is what you were looking for. Sub Macro2() With ActiveSheet.ListObjects.Add(SourceType:=0, Source:=Array(Array( _ "ODBC;DBQ=C:\Documents and Settings\epest\Desktop\ShiftDailyLog_b.xlsm;DefaultDir=C:\Documents and Settings\epest\Desktop;Driver={Mic" _ ), Array(...

Okay here is what I've accomplished: 1. I've named the calendar as a range and created a Worksheet_SelectionChange Event to set a target cell equal to the selected date. I created a macro to set another target cell equal to the shift when the user selects the shift. I then set these up as...

Thanks Skip. I built a query using the appropriate criteria. I'm stuck in two different areas. 1.) Where do I put the code to return the query to one column? I tried editing the SQL statement, but it says that the query cannot be represented graphically. 2.) How do I go about creating a...

Thanks for the advice Skip. I'll get to work on your suggestions and report back with progress. I've never written a query before. Can you point me in the right direction? Thanks. -ep

Skip, After looking further at your suggestion to use the Camera Picture shape, it seems that it is a much better choice since the user will not be typing into the box. I've also found that it resizes itself according to the cells it is displaying. I've created a separate worksheet and used...

Hi Skip. Thanks for the response. I do not intend for the user to enter additional data in the TextBox. The data is typed into a structured table on another sheet. I've copied a link below to a screenshot of the worksheet. I have two TextBoxes with sample data. I need the TextBox to...

Using Excel 2010, I have a table on Sheet1 with column headers: date, time, shift, manager and notes. Each day my managers enter a separate record for any issues they may have encountered throughout the day. On a separate sheet (Sheet4) I have a dynamic calendar setup. I would like to click...

Yes you are correct the data is oddly organized. What I did was insert an additional row and used it to maintain a contiguous range. Thanks for the help. Regards, -ep