굵은 텍스트의 일부를 만들려면

I VBA에서 다음과 같은 기능이 있습니다굵은 텍스트의 일부를 만들려면

Function ConcatinateAllCellValuesInRange(sourceRange As Excel.Range) As String 
     Dim finalValue As String 

     Dim cell As Excel.Range 

     i = 0  
     For Each cell In sourceRange.Cells 
     i = i + 1 
     Rzad = cell.Row 
      finalValue = finalValue & CStr(i) & ". " & CStr(Sheets(1).Cells(Rząd, 6)) & "/" & CStr(Sheets(1).Cells(Rząd, 7)) & ": " & Format(cell.Value, Bold) & "; " & vbCrLf 

     Next cell 

     ConcatinateAllCellValuesInRange = finalValue 
    End Function

내가 작동하지 않는 대담한 텍스트의 일부 있지만 '형식 (cell.Value, 굵게)'만들고 싶어 . 해결책을 제안 할 수 있습니까?

출처

2016-09-09 Grzegorz

하지 대답을하지만, 당신에게 힌트 http://stackoverflow.com/questions/21514704/how-to-를 제공 할 수 있습니다 : 당신이 굵은 셀 내용의 일부만을 확인하려면

참조 여러 색상의 텍스트 셀로 된 글꼴 기반 텍스트에서 추출 텍스트 기반 21514802 # 21514802 –

[여기] (http://stackoverflow.com/questions/10295380/excel)을 참조하십시오. -vba-make-part-of-string-bold) – Clusks

미리 알고있는 대상 셀 (출력을 저장하려는 범위)이 미리 알고 있습니까? 워크 시트의 고정 된 셀입니까, 아니면 항상 처리중인 데이터를 기준으로 한 동일한 열입니까? – silentsurfer

시도 : 당신이 원하는 경우

cell.Font.Bold = True

전체 셀은 굵게합니다. excel vba: make part of string bold

출처

2016-09-09 11:45:08 silentsurfer

셀이 객체가 아니기 때문에 'cell.Font.Bold = True'또는 'cell.Characters.Font.Bold = True'가 작동하지 않습니다. – Grzegorz

위의 함수를 호출하여 채워지는 하나의 셀은 다음과 같습니다. – Grzegorz

오브젝트입니다 ... 셀을 굵은 글꼴로 만들고 코드를 업데이트하려는 코드를 업데이트하십시오. – silentsurfer

굵은 텍스트의 일부를 만들려면

답변

관련 문제