Emilia Kowalczyk

Doświadczony ekspert ds. analiz biznesowych

Wypowiedzi

• Wszystko
• Tylko fora

• 
  Wpis na grupie Excel w temacie Zdjęcie z tabeli przestawnej w treści emaila

  28.05.2018, 15:44

  Hej,
  może ktoś wie jak zrobić zdjęcie z tabeli przestawnej. Jak korzystam z tego makra (rng to zaznaczony obszar gdzie znajduje się tabela przestawna), przy okazji robi mi wykres a na to nakleja zdjęcie tabeli przestawnej. W takiej sytuacji nakładają się na siebie zarówno wykres jak i tabela przestawna. Zdjęcie to wykorzystuje w makrze na wysyłanie emaila. Prośba o pomoc.
  
  Sub Zrob_zdjecie()
  
  Dim SHT As Worksheet
  Dim rng As Range
  
  Application.ScreenUpdating = False
  
  'okreslamy arkusz z naszym zakresem
  
  Set SHT = Sheets("Nazwa_Arkusza")
  
  'określamy zakres, który będziemy eksportwować
  
  Set rng = SHT.Range("B2:H10")
  
  'kopiujemy ten obszar
  
  rng.CopyPicture Appearance:=xlScreen, Format:=xlPicture
  
  With SHT.ChartObjects.Add(Left:=150, Top:=100, _
  Width:=1000, Height:=150)
  
  With .Chart
  .Paste
  .Export ThisWorkbook.Path & "\Temp.jpg"
  End With
  
  .Delete
  End With
  
  Application.ScreenUpdating = True
  
  End Sub

• 
  Wpis na grupie Fani Excela w temacie przeklejanie danych VBA - prośba o pomoc

  8.11.2017, 10:02

  Tak o to mi chodziło :)

• 
  Wpis na grupie Fani Excela w temacie przeklejanie danych VBA - prośba o pomoc

  8.11.2017, 09:34

  Cześć,
  prośba o pomoc w napisaniu makra:
  
  Mam obecnie tabelę o takim wyglądzie:
  
  |Ilość |ilość2
  TAK | 1 |65
  NIE WIEM|2 |78
  MOŻE |7 |90
  
  docelowo chcę uzyskać coś takiego. Z góry dziękuje za pomoc.
  
  TAK | 1 |Ilość
  NIE WIEM|2 |Ilość
  MOŻE |7 |Ilość
  TAK | 65 |Ilość2
  NIE WIEM|78 |Ilość2
  MOŻE |90 |Ilość2