Jerin abubuwan saukarwa na gargajiya a cikin takardar Excel yana da kyau, amma yana ba ku damar zaɓar zaɓi ɗaya kawai daga saitin da aka gabatar. Wani lokaci wannan shine ainihin abin da kuke so, amma akwai yanayi inda mai amfani ya buƙaci ya iya zaɓar wasu abubuwa daga lissafin.
Bari mu kalli aiwatar da ayyuka da yawa na irin wannan jerin zaɓin da yawa.
Zabin 1. A kwance
Mai amfani yana zaɓar abubuwa daga jerin zaɓuka ɗaya bayan ɗaya, kuma suna bayyana a hannun dama na tantanin halitta ana canza su, ana jera su ta atomatik:
Lissafin saukarwa a cikin sel C2:C5 a cikin wannan misalin an ƙirƙira su ta daidaitaccen hanya, watau
- zaɓi Kwayoyin C2:C5
- tab ko menu data zabi tawagar Ingancin Bayani
- a cikin taga da yake buɗewa, zaɓi zaɓi list kuma saka a matsayin kewayon source Kwayoyin da ke da bayanan tushe don lissafin A1: A8
Sa'an nan kana bukatar ka ƙara macro zuwa ga takardar module, wanda zai yi duk babban aiki, watau ƙara zaɓaɓɓun dabi'u zuwa dama na kore Kwayoyin. Don yin wannan, danna-dama akan shafin shafin tare da jerin abubuwan da aka saukar kuma zaɓi umarnin Lambar tushen. Manna lambar da ke biyowa a cikin taga mai gyara Visual Basic wanda ke buɗewa:
Canje-canjen Sub Worksheet_Kasuwanci(ByVal Target As Range) Akan Kuskure Ci gaba Idan Ba Tsakanin Ba (Manufa, Range("C2:C5")) Ba Komai Ba Ne Kuma Target.Cells.Count = 1 Sai Application.EnableEvents = Karya Idan Len(Target.Offset) (0, 1)) = 0 Sai Target.Offset(0, 1) = Target Other Target.Karshe(xlToRight).Offset(0, 1) = Ƙarshen Ƙarshen Target Idan ya cancanta, maye gurbin m kewayon zazzage lissafin C2:C5 a cikin layi na biyu na wannan lambar tare da naku.
Zabin 2. A tsaye
Kamar yadda yake a cikin sigar da ta gabata, amma ba a ƙara sabbin dabi'un da aka zaɓa zuwa dama ba, amma zuwa ƙasa:
Ana yin shi daidai da hanya ɗaya, amma lambar macro mai kulawa ta ɗan canza kaɗan:
Canje-canje na Sub Worksheet_Kasuwanci (ByVal Target Kamar Range) Akan Kuskure Ci gaba Na Gaba Idan Ba Tsakanin Ba (Manufa, Range("C2:F2")) Ba Komai Ba Ne Kuma Target.Cells.Count = 1 Sai Application.EnableEvents = Karya Idan Len(Target.Offset) (1, 0)) = 0 Sai Target.Offset(1, 0) = Target Other Target.Karshe(xlDown).Offset(1, 0) = Karshen Target Idan Target.ClearContents Application.EnableEvents = Gaskiya Karshe Idan Karshen Sub Bugu da ƙari, idan ya cancanta, maye gurbin kewayo mai mahimmanci na C2:F2 jerin zaɓuka da naku a cikin layi na biyu na wannan lambar.
Zaɓin 3. Tare da tarawa a cikin tantanin halitta ɗaya
A cikin wannan zaɓin, tarin yana faruwa a cikin tantanin halitta ɗaya inda jerin abubuwan da aka saukar yake. An raba abubuwan da aka zaɓa ta kowane hali (misali, waƙafi):
An ƙirƙiri jerin abubuwan da aka saukar a cikin koren sel a cikin daidaitaccen hanya, kamar yadda yake a cikin hanyoyin da suka gabata. Ana yin duk aikin, kuma, ta hanyar macro a cikin ƙirar takarda:
Canje-canjen Sub Worksheet_Kasuwanci(ByVal Target As Range) Akan Kuskure Ci gaba Idan Ba Tsakanin Ba (Manufa, Range("C2:C5")) Babu Komai Kuma Target.Cells.Count = 1 Sai Application.EnableEvents = Qarya newVal = Aikace-aikacen Target.Undo oldval = Target If Len(oldval) <> 0 And oldval <> newVal Sai Target = Target & "," & newVal Else Target = newVal End If If Len(newVal) = 0 Sai Target.ClearContents Application.EnableEvents = Gaskiya Karshen Idan Ƙarshen Sub Idan ana so, zaku iya maye gurbin halayen rabuwa (wakafi) a cikin layin lamba na 9 tare da naku (misali, sarari ko yanki).
- Yadda za a ƙirƙiri sauƙi mai saukewa a cikin tantanin halitta na Excel
- Jerin saukarwa tare da abun ciki
- Jerin saukarwa tare da ƙarin zaɓuɓɓukan da suka ɓace
- Menene macros, yadda ake amfani da su, inda za a saka macro code a cikin Visual Basic