¿¢¼¿ ¸ÅÅ©·Î Áú¹®ÀÔ´Ï´Ù.

ö   
   Á¶È¸ 1239   Ãßõ 0    

1;셀 DŽ16;1676;를 시트1060;름에서 가1256;오기 매크/196; 관/144; 1656;문1077;니다.

첫번1704; 시트 1060;름1060; 111068;  ,.160;번1704; 시트 1060;름1060; 1월 21068; 1064; ᅆ1;우

첫번1704; 시트셀에 "01/01 실 시 사 항" 셀에 =getSheetName(A1)  & " 실 시 사 항" 매크/196; 사용Ȣ16;여 1096; 나Ꮢ1;니다.

문1228;lj16; 

첫번1704; 시트셀에서  "01/02 예 1221; 사 항" 1060;라lj16; 항목1064;데... 셀에 =getSheetName(A1)  & " 예 1221; 사 항" 매크/196; 함수를 Ǻ12;떻,172; 1201;용Ȣ16;면 .112;까요?

댓글 감사합니다.


참1312;한 visual basic1077;니다 

Function getSheetName(anyCell As Range)

  Application.Volatile

  getSheetName = anyCell.Parent.Name

End Function

ªÀº±Û Àϼö·Ï ½ÅÁßÇÏ°Ô.
´ëÃæ µ¹°Ô¸¸ ¸¸µé¾îºÃ½À´Ï´Ù

Function getSheetName2(anyCell As Range)

  Dim ix As Integer, i As Integer, rtn As String, nxt As Boolean

  Application.Volatile

  ix = Worksheets.Count
 
  nxt = False
 
  For i = 1 To ix
    If (nxt = True) And (rtn = "") Then
        rtn = Sheets(i).Name
    End If
   
    If Sheets(i).Name = anyCell.Parent.Name Then
        nxt = True
    End If
   
  Next
 
  getSheetName2 = rtn

End Function
´Ù¸¥ ½ÃÆ®¸¦ ÂüÁ¶ÇÏ·Á¸é
 =getSheetName(Sheet2!A1)  & " ¿¹ Á¤ »ç Ç×"
ó·³ »ç¿ëÇÏ¼Å¾ß ÇÕ´Ï´Ù. ½ÃÆ®¸íÀ» »ý·«Çϸé ÇöÀç È°¼ºÀÎ ½ÃÆ®°¡ »ç¿ëµË´Ï´Ù.


QnA
Á¦¸ñPage 18/438
2022-03   1226   L2½ºÀ§Ä¡
06-25   685   Á¤»ó¾ï
2023-04   1507   È­¶õ
2022-03   8225   VSPress
06-22   1132   °Ç¾à
2023-04   2568   ÇÑÈ¿¼®
2022-03   1196   ´ç±Ù
06-20   651   ¸í¶û
2023-04   2176   iwill
2022-03   2035   ±èÈ¿¼ö
06-19   413   FX8300
2023-04   1715   ±èµ¿ÀÚ¸Ç
2022-03   2303   ¹Ú¹®Çü
06-17   587   ½Å¿ì¼·
2023-04   2036   ÆĽã
2022-03   2522   Âî·Ï
06-14   903   ÆĹô
2023-04   4139   Àß»ì¾Æº¸ÀÚ
2022-03   1446   Jasper
06-12   1136   2CPUÃÖÁÖÈñ