I've been trying to paste formula throughout a range of cells in the same column. Trouble is, I protect some sub- total cells and don't want the formula to paste over those sub-total formulas.
If I protect the sheet and paste the formula throughout the column including the protected cells, I would get an error message.
How can I paste the new formulas without getting into trouble of the protected cells?
How can i set up my spreadsheet so that all protected cells are a different colout to the main sheeT.
I would like this colouring to appear in the sheet when in protected and unprotected mode
Have you ever copy a row with formula in locked cells & insert it in a protected worksheet?
View 1 Replies View RelatedSo i have sheet 1 with some cells locked and protected (but open to copying) as a template and sheet two will be where people paste one or more of the template formula on an ongoing basis. How do i mantain the locked and protected cells after they have been pasted? I have unlocked sheet two pasted the first template and had to choose protect cells after pasting, and further pasting of locked cells are not protected.
View 1 Replies View RelatedHere is an excerpt of my code
Code:
Else
Sheet8.Unprotect Password:="rm123abc"
Sheet8.Range("V" & rw) = "Item is not found in the Data Base. Please Contact DME for all documentation requirements for this item"
Sheet8.Protect Password:="rm123abc", AllowFiltering:=True, AllowInsertingRows:=True, AllowDeletingRows:=True
End If
Unfortunately, once the code has run and has finished re-protecting my sheet, it doesn't allow the user to select locked cells. These locked cells contain hyperlinks, and they need to click on these hyperlinks to navigate through my workbook.
So I have two questions:
1. How can I enable allow user to select locked cells
2. Do I have to allow the user to select locked cells to access my hyperlinks, or is there another option?
I have this excel sheet I'm trying to create (to make my life better at work). It's to track credit card refunds. It'll be saved on sharepoint. So my department will fill in the data on the "Ops" side, and then the accounts department will fill in their side. It's very rudimentary, but anything is better than the old, tattered BOOK we are currently using.
So far, I have the user/date/time stamps autofill, when the user fills in "Entered by" or "Recieved by". I have those cells locked so no one can edit it. I have separte passwords for both sides (Ops and Accounts).
What I want now is to be able to:
1. Lock each line once it's been entered and saved. Say my department fills in one entry. We save it. After that, it CANNOT be edited. If there are any changes, I'll put in a remarks column so people can enter stuff.
2. If someone enters the first two columns (Guest name, booking number), then the "Entered by" HAS to be filled, or the workbook cannot be saved.
3. ONLY letters can be used for Guest Name and Entered by. I've tried different things for this. While I've managed to make it work if the user enters a digit first, I can still enter John56, and it'll pass. I need it to only allow letters (and spaces).
4. The "Booking Number" should only allow six digits. No less no more than six digits. It can be 000001 even. But it has to have six. And, obviously, no letters, no spaces.
In the "ThisWorkbook" module, I've got this code:
Code:
Private Sub Workbook_Open()
Dim wSheet As Worksheet
For Each wSheet In Worksheets
wSheet.Protect Password:="hurlEy!", _
UserInterFaceOnly:=True
Next wSheet
End Sub
In the sheet1 module, I've got this code:
Code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error GoTo enditall
Application.EnableEvents = False
If Target.Cells.Column = 3 Then
With Target
If .Value "" Then
.Offset(, 1).Value = Environ("username")
[code]....
I have a formatted budget vs actual income statement that has subtotals in the appropriate spots. I would like to be able to paste over the entire column with updated data, but not write over the formulas. For instance, in one spreadsheet I have the data for the month of June and in another I have the data for the month of July. Both have the same number of rows, but are formatted slightly differently. I want to be able to replace the June data with the July data. My first thought was to lock the cells with the formulas, protect the sheet and then paste over the entire column, but I get the following error:
The cell or chart that you are trying to change is protected and therefore read-only.
To modify a protected cell or chart, first remove protection using the Unprotect Sheet command (Review tab, Changes group). You may be prompted for a password)
I have a range that I need to copy to a new worksheet. It basically looks like steps going across the sheet. Whenever I skip blank cells during the paste to the new sheet Excel does not skip anything. Any ideas on how I would shift all data to be on the left side of the without copying the blank cells.
View 5 Replies View RelatedI have users that are using a protected Excel Workbook where they sometimes have a need to copy values from Internet Explorer paste them into the protected Excel Workbook. When this happens, if the users select the cell and don't actually paste the text into the formula bar (or by double clicking the cell), they can replace the destination cell's formatting - which in this case makes the cells a locked cell instead of a unlocked cell.
Now is there a way to automatically have the pasted value keep the destination formatting? Or perhaps is there a way to set the copy and paste settings so it only pastes text from Internet Explorer into Excel and not the formats?
It is not an option for the userbase to select the option choice of matching the destination formating when pasting as it is a very large user base without much Excel experience.
I have locked some cells on my Spreadsheet so other people can not change them. What I would like to know is how do I change the colour of the font? I also would like to Bold/unbold the font.
View 6 Replies View RelatedI just realized that some of my comments on a worksheet are being cut off or not viewable. By Default the Comment is displayed to the Right of its cell. I have a Scroll Lock to prevent users from scrolling off the work area. Some of the comments are being displayed past this scroll area and the user is unable to read the comments as they are being cut off or being displayed beyond the scroll area.
Is there anyway to reposition or set the area that these comments are displayed? For Example, to the Left of the cell so that they are able to be viewed. The Workbook is Protected and the Cells with comments are locked so the user won't be able to click on the cell. I found 2 Codes that would work if the user could either click on the cell or if the comment always visible(they are not)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim rng As Range
Dim cTop As Long
Dim cWidth As Long
Dim cmt As Comment
Dim sh As Shape
Application.DisplayCommentIndicator _
= xlCommentIndicatorOnly
Set rng = ActiveWindow.VisibleRange
cTop = rng.Top + rng.Height / 2 ................
1.to copy the A2 Cell of Sheet1 to A3 cell of Sheet 2 by VBA?
Also,
2. How can I copy A2:A10 from sheet1 to A1:A9 of sheet 2 by VBA?
I need to copy and paste a range from one workbook to another workbook automatically.
Basically, I have 180 files in a folder. The details are:
1) 90 master files
2) from these a range named "COPYTOE" has to be copied and pasted into another 90 report files.
3) I have list of files & its passwords in a separate file named FNAME.XLS. In this, Sheet1, A1:C the details consist like this: ....
I have a workbook with multiple sheets interacting with one another. On one of them the user is prompted to make lists of expenses in multiple columns. The column labels are in row one, and row two has the sums of all the cells below. I have every sheet in the workbook protected, so that only the cells that need to be modified are unlocked. The problem is that the user can drag cells around and change the range of the functions in row two (locked cells).
For example, A2 has the function =sum(A3:A100). But if the user drags the values in A3:A5 to A6:A8, the formula in A2 changes to =sum(A6:A100). Is there anyway that I can allow the user to drag cells (this could be a useful feature), but keep the formulas in the second row fixed?
I want a VBA function to fire "ONLY" when a cell is changed.Peramiters:
Data ertry range is full, Last cell in SubTotals range has changed from $0.00 to anything >, Last 3 cells are Locked, Protected and Unselectable Attached is a copy of the work book. I have posted on VBA Express and we have tried to solve this problem, We have come a long way. You might want to read the history link above.
Is there any way to allow autofiltering and sorting even with locked cells within the range to be sorted? I've conditionally locked some cells based on user input, and at the end of my vb code I have allowsorting and allowfiltering. But I want to sort cells that are locked even after that. Does anyone know if that's even possible with VB?
View 4 Replies View RelatedI have received following macro from someone to delete series but the problem is that it gives error when some sheets are protected, and I want those sheets to protected. When run it will ignore/leave protected sheets but delete series only from unprotected sheets
Private Sub CommandButton1_Click()
Dim Rng As Range, i As Long, r As Range, lVal, uVal
Dim DeleteCount As Double
Dim lRow As Long
Dim dr As Long
Dim dc As Long
dc = Sheets("Deleted Numbers").UsedRange.Columns.Count - 1
dr = Cells(Rows.Count, Sheets("Deleted Numbers").UsedRange.Columns.Count - 1).End(xlUp).Row + 1
If dr = 60001 Then ................
i am trying to use Skib blank in paste special
but it pastes the value with the same blank cell
================
We have a document template set up in excel which we have to use to accompany documents/drawings issued to customers. I have a macro set up to copy the cells required in the template and create a new tab with our company reference as the tab name, then copy and paste the relevant data into the log.
We could be issuing one or up to 10 documents at the same time to the customer, therefore there are between 1 and 10 rows which could contain data. Due to this, when pasting to the log, I have asked the macro to choose the next available row and paste as values and skip blanks.
However, when there are blanks on the template, it is copying all these cells and I am being left with lots of blank rows in the log. Is there anything I can do to correct it?
Below is the macro code in which the code is segregating the data page wise i want the below changes:
> macro should copy and paste only values with the option skip blanks.
Private Sub CommandButton1_Click()
Dim j As Long
'Setup the loop to loop through the Areas
For j = 1 To Columns(1).SpecialCells(2).Areas.Count
'Add a new WorkSheet
[Code] .....
Can a macro make a workbook everytime you copy, it will paste special formulas only and skip blank rows? And can I still let me select the range manually? I would like to use this to link workbooks.
View 2 Replies View Related1.I need to protect certain locked cells from editing and allow certain unlocked cells to be changed on multiple worksheets.
2.When all of the changes are made to the unlocked cells, I need to password protect the entire workbook (except one worksheet) from any changes. (i.e. Prevent even the unlocked cells from being edited)
3.I also need a password to un-protect the workbook and return it to the state described in # 1. above .
I have data in some of the cells within range A26:A39
These cells are populated via an IF function on another worksheet. Even though the cells appear blank (as in the value returned is ""), there is a formula in these cells. I think it's called formula blank?
I am looking for a way to copy the data from the cells within the range which are not blank (ie: not = "") and paste this data elsewhere on the sheet in a list with no blank spaces in between.
I anticipate that there will be 4 non blank cells within this range.
Ideally I would have data from the nonblank cells copied and pasted to cells
A40
A41
A42
A43
I want to allow user copy(Ctrl + C) and paste(Ctrl + V) a row. because some columns are locked and the sheet is protected. so, when user doing so, a warning dialog is show and can't do the paste.
so, I want to make it available in code. what I want to do is add some codes in this function:
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.CutCopyMode = True Then 'there are someing in clipboard
Sheet1.Unprotect 'unprotect sheet, so can paste
End If
and in Worksheet_Change function, I protect the sheet again.
But I find that when I do Sheet1.Unprotect , the clipboard is empty! I just want to allow user can copy and paste a row, the locked cell's value can be ignored.
I've got two files: the one that is the source file and the second one which is the target file. The target file is password protected (let us take the number 1 as the password in this case). I have a macro that would copy the value of an example cell to the target file:
Sub iso()
Dim wBook As Workbook
Range("A2").Activate
ActiveCell.Copy
On Error Resume Next
Set wBook = Workbooks("Test2.xls")
If wBook Is Nothing Then
ChDir "D:"
Set oWB = Workbooks.Open(Filename:="D: est2.xls")
to add a line (or two) to this code, that would open and unprotect the target file and then at the and protect the target file with the same password.
I want to allow user copy(Ctrl + C) and paste(Ctrl + V) a row. because some columns are locked and the sheet is protected. so, when user doing so, a warning dialog is show and can't do the paste. so, I want to make it available in code.
what I want to do is add some codes in this function:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.CutCopyMode = True Then 'there are someing in clipboard
Sheet1.Unprotect 'unprotect sheet, so can paste
End If
and in Worksheet_Change function, I protect the sheet again. But I find that when I do Sheet1.Unprotect , the clipboard is empty!!! I just want to allow user can copy and paste a row, the locked cell's value can be ignored.
I have a spreadsheet where a column has many cells being empty and others with values. I need to use copy-paste skip blanks to another column so it only overwrites cells that contains values. BUT The cells in the column appears to be empty, not blank, when I try use the copy-paste skip blanks it doesnt work. However, when I press delete in every empty cell the copy-paste skip blanks works for those cells.
Do you got a fast method to make all the empty cells blank?
Enabling users to copy and paste values in a protected sheet.
The sheet is protected because some of the columns are autopopulated based on formulas and I do not want someone to spoil the file.
Users are complaining that in many cases half of the information which they enter in one row have to be repeated in the nect 10 rows.
[Code] .....
is already in place to allow users to select and copy. How to enable them to paste in the same protected sheet?
The problem is coming from the Else statement.
Code:
Sub LockByColor()
ActiveSheet.Unprotect "pc"
Dim cl As Range
For Each cl In Range("$BO$1:$BZ$45")
If cl.Interior.Color = 6299648 Then
cl.Locked = True
Else: cl.Locked = False
End If
Next cl
ActiveSheet.Protect "pc"
End Sub
Sheets("PRODUCTIVITY").Select
Range("A20").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlDown)).Select
With Selection
.Locked = False (***debug screen is highlighting this line***)
.FormulaHidden = False
.ClearContents
End With
Range("A20").Select
ActiveCell.FormulaR1C1 = "PASTE NEW DATA HERE"
Range("A20").Select
This worksheet was built for use of many users so this sheet is PROTECTED.
The user is instructed to copy/paste information from our internal web into the selected areas in the worksheet.
When i UNPROTECT the worksheet the VBA works fine.
The data in the worksheet spans from columns A to P, and the length (# of records) is variable.