Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 180
Default force entry in cell "B" if entry made in cell "A"

I'd like to force (or at least encourage) entry in a cell in column B if the
user enters data in the same row cell of column A. For instance, if they
input "Add class" in cell A1, they must input data in B1.
  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 11,501
Default force entry in cell "B" if entry made in cell "A"

Donna,

Right click your sheet tab, view code and paste the code below in. If the
user enters the string Add Class in any cell in column A they get a message

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count 1 Or IsEmpty(Target) Then Exit Sub
If Not Intersect(Target, Range("A:A")) Is Nothing Then
Application.EnableEvents = False
If UCase(Target.Value) = "ADD CLASS" Then
Target.Offset(, 1).Select
MsgBox "Please enter data into B" & Target.Row
Application.EnableEvents = True
End If
End If
End Sub

Mike

"Donna" wrote:

I'd like to force (or at least encourage) entry in a cell in column B if the
user enters data in the same row cell of column A. For instance, if they
input "Add class" in cell A1, they must input data in B1.

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Cell reads "Value" without an entry Mark Excel Worksheet Functions 6 February 6th 09 05:53 AM
Formula to confirm entry in Col "C" is valid for data in Col "A" VAPCMD Excel Discussion (Misc queries) 2 January 2nd 09 07:58 PM
Excel - Golf - how to display "-2" as "2 Under" or "4"as "+4" or "4 Over" in a calculation cell Steve Kay Excel Discussion (Misc queries) 2 August 8th 08 01:54 AM
Can you assign an "order" for cell entry? TheMilkGuy Excel Discussion (Misc queries) 8 January 25th 08 03:22 PM
Complex if test program possible? If "value" "value", paste "value" in another cell? jseabold Excel Discussion (Misc queries) 1 January 30th 06 10:01 PM


All times are GMT +1. The time now is 08:13 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"