When I use "Merge & Center cells with Labels" of a pivot table, It is merging Column labels as well as row labels. Is there a workaround to apply this feature only for column labels and not for row labels.
I am trying to create a Dashboard in excel (2010) using tables/pivot tables to build it. The data I am bringing into excel has these key fields of data: cost center+cost center description, general ledger account+general ledger account description, and YTD amount.
My problem is the data is from an external source report and the report has subtotals built in at cost center, and the report's format of subtotaling puts the cost center first and then the general ledger accounts below. There is no formula value in the cell that has the subtotaled amount and the number of general ledger accounts can vary depending on whether there has been general ledger activity.
I want to take this format: July YTD Cost Ctr 1050 XYZ$6.00 625110 Supplies$2.00 650150 Postage$2.00 650550 Fees$2.00 Cost Ctr 1052 ZZZ$4.00 670500 Pens$2.00
and have it look like this Cost CenterCost Center DescrGL AcctGL Acct descYTD Amt 1050 XYZ 625110 Supplies $2.00 1050 XYZ 650150 Postage $2.00 1050 XYZ 650550 Fees $2.00 1052 ZZZ 679200 Pens $2.00
Besides manually doing data moves and assigning a unique sort sequence number to keep the records together, how else can I quickly move my cost centers to a new column and keep the cost center with the gl account and $amount?
I have a mass of data which look something like this:
and I require the ranges of reference numbers to be listed in a column one above the other, which requires inserting new rows. I also need the date & description columns copied down into the newly inserted rows.
So basically for example I would want the top row to now read:
and then apply the same procedure to the other ranges below this.
Say column A has either numbers or text in each cell, I need a macro to only get each number in each cell that is not a duplicate of a number in any previous cell and list each number found down column B.
I have a column of variances, these contain both negative numbers and positive numbers. I want to gather a sum of all the negative numbers and positive numbers separtely. Basically saying all the positive overeages = this amount And all the negative shortages = this amount. you can see the attached sample.
I'm working on a spreadsheet with about 400 rows and 10 columns. All the numbers in the columns are formatted as text, which doesn't allow me to use AutoSum. I have selected the cells and formatted them as number with no decimals, but AutoSum still doesn't work because the formatting hasn't changed and they're still formatted as text. I know if I double click each cell, the cell changes the format from text to number, but that will take a lot of time to change 400 cells in each of the 10 columns. What can I do to quickly reformat the cells from text to number?
How can I get the message to display in the center of the display box?
If i < 3 Then If MsgBox(Tries - i & " Tries Remaining." & vbLf & vbLf & " Try Again?", vbYesNo) = vbNo Then Exit For
As you can see the "try again?" & the text "Tries Remaining"works fine by entering spaces, but the number that is suppose to display with "Tries Remaining" does NOT center. How can I get the number to display in the center along with the text?
This is the complete code.
Private Sub Workbook_Open() Dim i As Integer, Tries As Integer Dim PassTry As String Const Pass As String = "Password" Dim storedPath As String On Error Resume Next storedPath = ThisWorkbook.CustomDocumentProperties("PathCertString").Value On Error GoTo 0..................
I am developing a form for emergency dispatching. One of the features of this dispatch sheet is that there are several maps in it that open on a seperate form. The map form has 4 maps that are picture files in an image. these images are in a frame. The different images are selected using option buttons. Given the background above, my problem is this. I have code that zooms in 50% each time the Click event for the image is fired. wht i am trying to do is make the zoomed view center where i clicked. this is the code that i have so far but it doesn't work all that spectacular, the closer I zoom in the further out of center the place i clicked gets untill it is out of view.
Private Sub Layout_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) CurrentX = X CurrentY = Y End Sub
Private Sub PlantLayout_Click() If Frame1.Zoom < 400 Then Frame1.Zoom = Frame1.Zoom + 50 frmmap.Frame1.ScrollLeft = CurrentX - (Frame1.Width / 2) frmmap.Frame1.ScrollTop = CurrentY - (Frame1.Height / 2) frmmap.Repaint End Sub
Any way to vertically and horizontally center an autoshape in a cell without VBA. I created a shape and placed it in a cell but don't think it is centered. Also, if I add shapes to adjacent cells, I would want them all to be centered directly in the middle of the cells they are in. Using the align feature only seems to make sure the shapes are aligned to each other but doesn't seem to put them in the center of their respective cells.
Here's a weird one: I can't get some of my cells to align to center/left/right. Both the buttons on the toolbar and Format->Cells->Alignment won't work. The kicker is that other cells on the same sheet will center/left/right just fine. Is there some kind of formatting protection I inadvertently set?
I have a worksheet (Covers) that is going to be the front and back covers for a binder.
The title/text portion is automatically filled from cells elsewhere in the workbook.
I have a button to bring up a userform that allows one to select the images (3 .jpg images) you wish to use on the cover pages.
I have code that successfully brings up the userform, and allows image selection and preview within the userform.
Now I want to insert these selected images into the worksheet, centered on specified cells and sized (zoom) to a maximum width/height (whichever is reached first).
Can a blank Picture be inserted with its size specified/fixed, then use code (Image1 = LoadPicture?) to change what is displayed?
Or do I have to calculate the size, center it on the page, and insert the image each time?
The code (in part) for the UserForm looks like:
Private Sub SelFcvrImg_Click()
Dim FCpicName As Variant ChDir ("S:DanBuilder Logos-Photos") FCpicName = Application. GetOpenFilename(Title:="Select an Image!", _ fileFilter:="Pictures (*.bmp;*.gif;*.tif;*.jpg),*bmp;*gif;*.tif;*.jpg") If FCpicName <> False Then InsertImgForm.FCoverImgPrvw.Picture = LoadPicture(FCpicName)
The UserForm has an Image (preview) with PictureSizeMode set to zoom.
I'm really after the same thing embedded in the sheet...
I'm having trouble centering my UserForms on the screen. I have tried all the options on the StartUpPosition in the Properties windows and the closest I can get is vertically centered but on the far left. The annoying thing is that it was working (both vertically and horizontally centered) but when I changed the defaults of the option buttons they moved to the position I described. I have two monitors (but excel is maximised on one monitor only) could this have something to do with my problem? If so why did it work before?