forms - excel 2010: based on a radio button selection save user from date to ain a different worksheet -

-

i have excel form works , saves data 1 worksheet. able put radio button , based on selection save diffent work sheet. example: if radio button 1 selected save sheet1 if radio button 2 selected save sheet2 if radio button 3 selected save sheet3

same form used save on different worksheet.

the code im working with.

private sub btn_append_click()  dim irow long dim ws worksheet set ws = worksheets("assessment")  'find first empty row in database irow = ws.cells.find(what:="*", searchorder:=xlrows, _     searchdirection:=xlprevious, lookin:=xlvalues).row + 1  'check part number if trim(me.txt_roomnumber.value) = ""   me.txt_roomnumber.setfocus   msgbox "please enter room number"   exit sub end if  'copy data database 'use protect , unprotect lines, '     password '     if worksheet protected ws '  .unprotect password:="password"   .cells(irow, 1).value = me.txt_roomnumber.value   .cells(irow, 2).value = me.txt_roomname.value   .cells(irow, 3).value = me.txt_department.value   .cells(irow, 4).value = me.txt_contact.value   .cells(irow, 5).value = me.txt_altcontact.value   .cells(irow, 6).value = me.cbx_devices.value   .cells(irow, 7).value = me.cbx_wallwow.value   .cells(irow, 8).value = me.txt_existinghostname.value   .cells(irow, 10).value = me.cbx_relocate.value   if me.ckb_powerbar.value = true cells(irow, 11).value = "y"   if me.ckb_datajackpull.value = true cells(irow, 12).value = "p"   .cells(irow, 13).value = me.txt_existingdatajack.value   if me.ckb_hydropull.value = true cells(irow, 14).value = "p" else cells(irow, 14).value = "a"   .cells(irow, 19).value = me.txt_cablepulldesc.value   .cells(irow, 20).value = me.txt_hydropulldesc.value   .cells(irow, 21).value = me.txt_otherdesc.value '  .protect password:="password" end  'clear data 'me.txt_roomnumber.value = "" 'me.txt_roomname.value = "" 'me.txt_department.value = "" 'me.txt_contact.value = "" 'me.txt_altcontact.value = "" me.cbx_relocate.value = "" me.txt_existinghostname = "" me.txt_altcontact.setfocus  end sub  private sub btn_close_click()  unload me end sub  private sub combobox1_change()  end sub  private sub userform_click()  end sub  private sub userform_queryclose(cancel integer, closemode integer)  if closemode = vbformcontrolmenu     cancel = true     msgbox "please use close form button!"   end if end sub

the first thing add radio-buttons (actually optionbutton) form , name them.

then check if 1 of them selected use code such as:

if optsheet1     'it checked elseif optsheet2     'the second 1 checked 'etc end if

Comments

Post a Comment

Popular posts from this blog

ios - Memory not freeing up after popping viewcontroller using ARC -

-
hi project arc based, using uinavigationcontroller make transition between viewcontroller. using profiler analyse happening behind scene memory. noticed when push viewcontroller allocate memory components , when pop not freeing allocated memory. since using arc unable implement dealloc or release component. have analysed in detail , there no memory leak in project. i not using strong property push viewcontroller. here how pushing viewcontroller. viewcontroller *obj = [[viewcontroller alloc] init]; [self.navigationcontroller pushviewcontroller:obj animated:no]; any clue whats going on? should free memory have consumed. please advise your description indicates have retain cycle, leads objects not being deallocated. typical source of retain cycles properties assigned loading nib files (usually declared iboutlet ). two strategies break them , release objects: declare property weak : @property (nonatomic, weak) iboutlet uilabel *statuslabel; set property nil in...
Read more

Django REST Framework perform_create: You cannot call `.save()` after accessing `serializer.data` -

-
i have following viewset: class artistprofileviewset(viewsets.modelviewset): queryset = artistprofile.objects.all() serializer_class = artistprofileserializer def perform_create(self, serializer): if serializer.is_valid(): serializer.save() with following serializers: class simpleartisttrackserializer(serializers.hyperlinkedmodelserializer): class meta: model = artisttrack fields = (...my fields...) class artistprofileserializer(serializers.hyperlinkedmodelserializer): owners = userserializer(many=true, required=false) tracks = simpleartisttrackserializer(many=true, required=false) class meta: model = artistprofile fields = (...my fields...) i getting following error: assertionerror: cannot call `.save()` after accessing `serializer.data`.if need access data before committing database inspect 'serializer.validated_data' instead. i don't see editing serializer.data object. th...
Read more

Why does Go error when trying to marshal this JSON? -

-
i'm trying rather simple example of trying decode json file structs using golang. however, when attempting error that json: cannot unmarshal object go value of type []main.track which don't understand. here's code in question, , json can found here . package main import ( "encoding/json" "fmt" "net/http" "os" ) // tracks group of track types type tracks struct { tracks []track } // track represents singular track type track struct { name string url string artist artist } // artist represents single artist type artist struct { name string mbid string url string } func main() { url := "http://ws.audioscrobbler.com/2.0/?method=geo.gettoptracks&api_key=c1572082105bd40d247836b5c1819623&format=json&country=netherlands" response, err := http.get(url) if err != nil { fmt.printf("%s\n", err) os.exit(1) } de...
Read more